ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] ¨Ì¦WºÙ·j¬dWordªº¸ê®Æ­¶ªº°ÝÃD

¥i§_¸Ô­z»Ý¨D
¦p­n¦b­þ¤@­¶¿é¤J,­n«ç»ò§e²{
°¶Ôйq¤l®Ñ,Åwªï§K¶O¤U¸ü°Ñ¦Ò
http://www.twbts.com/ebook/?subject=office
http://www.twbts.com/ebook/?subject=soft
°¶ÔÐÂîѮw---https://www.facebook.com/groups/669579416484096/
¦³¤@®a¬a¥J©±---https://www.facebook.com/sadodona

TOP

¦^´_ 3# chaoping22
ÁÙ¬O¤£¤Ó²M·¡±zªº»Ý¨D,¬Ý¬Ý¬O¤£¬O±z­nªº
­º¥ý±N¨C­¶ªº«È¤á¦WºÙ³]¬°®ÑÅÒ
¦A©ó³Ì«e­±¤@­¶,·s¼WTextBox¤ÎCommandButton
  1. Private Sub CommandButton1_Click()
  2. If ActiveDocument.Bookmarks.Exists(TextBox1.Value) = True Then
  3. Selection.GoTo What:=wdGoToBookmark, Name:=TextBox1.Value
  4. Else
  5. MsgBox ("®ÑÅÒ¤£¦s¦b")
  6. End If
  7. End Sub
½Æ»s¥N½X
¤£¹L­Y¬O¦p¦¹ªº®ÄªG,¨º¤]¥i¥H«öF5,¿ï¾Ü [¨ì],¦A¿ï[®ÑÅÒ]
°¶Ôйq¤l®Ñ,Åwªï§K¶O¤U¸ü°Ñ¦Ò
http://www.twbts.com/ebook/?subject=office
http://www.twbts.com/ebook/?subject=soft
°¶ÔÐÂîѮw---https://www.facebook.com/groups/669579416484096/
¦³¤@®a¬a¥J©±---https://www.facebook.com/sadodona

TOP

¥»©«³Ì«á¥Ñ °¶ÔÐ ©ó 2011-6-8 21:38 ½s¿è

¦^´_ 6# chaoping22

¥ý¬Ý¬Ý¬O§_²Å¦X±zªº»Ý¨D

1000608.jpg

¬d¸ß®ÑÅÒ.zip (13.32 KB)
°¶Ôйq¤l®Ñ,Åwªï§K¶O¤U¸ü°Ñ¦Ò
http://www.twbts.com/ebook/?subject=office
http://www.twbts.com/ebook/?subject=soft
°¶ÔÐÂîѮw---https://www.facebook.com/groups/669579416484096/
¦³¤@®a¬a¥J©±---https://www.facebook.com/sadodona

TOP

¦^´_ 5# chaoping22

¤@­ÓÀɮפº,¥i¥H³]©w¦h­Ó®ÑÅÒ
°¶Ôйq¤l®Ñ,Åwªï§K¶O¤U¸ü°Ñ¦Ò
http://www.twbts.com/ebook/?subject=office
http://www.twbts.com/ebook/?subject=soft
°¶ÔÐÂîѮw---https://www.facebook.com/groups/669579416484096/
¦³¤@®a¬a¥J©±---https://www.facebook.com/sadodona

TOP

¥»©«³Ì«á¥Ñ °¶ÔÐ ©ó 2011-6-8 22:06 ½s¿è

¦^´_ 9# chaoping22
¬Ý¬Ý¬O§_²Å¦X±zªº»Ý¨D,­Y¤£¬O,¤W¶ÇÀɮפW¨Ó§a,§_«h¥u¦³®ö¶O©¼¦¹ªº®É¶¡,¥H¤Îºô¸ô¸ê·½!
1000608.gif
°¶Ôйq¤l®Ñ,Åwªï§K¶O¤U¸ü°Ñ¦Ò
http://www.twbts.com/ebook/?subject=office
http://www.twbts.com/ebook/?subject=soft
°¶ÔÐÂîѮw---https://www.facebook.com/groups/669579416484096/
¦³¤@®a¬a¥J©±---https://www.facebook.com/sadodona

TOP

¦^´_ 12# chaoping22

­n±Ò°Ê¥¨¶°
°¶Ôйq¤l®Ñ,Åwªï§K¶O¤U¸ü°Ñ¦Ò
http://www.twbts.com/ebook/?subject=office
http://www.twbts.com/ebook/?subject=soft
°¶ÔÐÂîѮw---https://www.facebook.com/groups/669579416484096/
¦³¤@®a¬a¥J©±---https://www.facebook.com/sadodona

TOP

¦^´_ 14# chaoping22

¦pªG¥H[¤å¦r¤è¶ô]¿é¤Jªº¸Ü,¥²¶·­nª¾¹DÀɮפ¤¦³­þ¨Ç[®ÑÅÒ]
©Î³\¥i¥H§ï¬°[¤U©Ô¦¡¤è¶ô]
¦A´£¨Ñ°Ñ¦Ò!
  1. Private Sub Document_Open()
  2. ComboBox2.AddItem "a"
  3. ComboBox2.AddItem "b"
  4. ComboBox2.AddItem "c"
  5. ComboBox2.AddItem "d"
  6. ComboBox2.AddItem "e"
  7. End Sub
½Æ»s¥N½X
  1. Private Sub CommandButton1_Click()
  2. If ActiveDocument.Bookmarks.Exists(ComboBox1.Value) = True Then
  3. Selection.GoTo What:=wdGoToBookmark, Name:=ComboBox1.Value
  4. Else
  5. MsgBox ("©êºp¡I±z©Ò¿é¤Jªº®ÑÅÒ¤£¦s¦b")
  6. End If
  7. End Sub
½Æ»s¥N½X
°¶Ôйq¤l®Ñ,Åwªï§K¶O¤U¸ü°Ñ¦Ò
http://www.twbts.com/ebook/?subject=office
http://www.twbts.com/ebook/?subject=soft
°¶ÔÐÂîѮw---https://www.facebook.com/groups/669579416484096/
¦³¤@®a¬a¥J©±---https://www.facebook.com/sadodona

TOP

¦^´_ 17# infoverdad

¤§«e¬O´£¨Ñ³z¹L[«ö¶s]¤Î[¤U©Ô¦¡¤è¶ô]ªº¤è¦¡
«È¤á±ÄÁÊ°O¿ýªív01-1.zip (15.44 KB)

¥H¤U¥H±zªº¨Ò¤l­×§ï¦¨¶È³z¹L[¤U©Ô¦¡¤è¶ô]ªº¤è¦¡
«È¤á±ÄÁÊ°O¿ýªív01-2.zip (13.24 KB)
°¶Ôйq¤l®Ñ,Åwªï§K¶O¤U¸ü°Ñ¦Ò
http://www.twbts.com/ebook/?subject=office
http://www.twbts.com/ebook/?subject=soft
°¶ÔÐÂîѮw---https://www.facebook.com/groups/669579416484096/
¦³¤@®a¬a¥J©±---https://www.facebook.com/sadodona

TOP

        ÀR«ä¦Û¦b : ¶¢¤HµL¼Ö½ì¡A¦£¤HµL¬O«D¡C
ªð¦^¦Cªí ¤W¤@¥DÃD