- ©«¤l
- 1018
- ¥DÃD
- 15
- ºëµØ
- 0
- ¿n¤À
- 1058
- ÂI¦W
- 0
- §@·~¨t²Î
- win7 32bit
- ³nÅ骩¥»
- Office 2016 64-bit
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ®ç¶é
- µù¥U®É¶¡
- 2012-5-9
- ³Ì«áµn¿ý
- 2022-9-28
|
¦^´_ 1# reangame
¿ï¾Ü¦¬½L¤é´Áªí³æªºµ{¦¡½X¥i·s¼W¥[¤@Ó¥þ°ìÅܼơAÀx¦s¬O¨Ó¦ÛþÓ«ö¶s¡C
¦p¡i¿ï¾Ü¦¬½L¤é´Á¡jµ{¦¡½X¤W¤è¥[¤W:- Public Enum enumClickOption
- optDefault
- opt¿ï¾ÜªÑ²¼¦¬½L¦æ±¡
- opt¿ï¾ÜªÑ²¼¤ñ¨Ò¸ê®Æ
- opt¿ï¾Ü¤T¤jªk¤H¸ê®Æ
- End Enum
- Public fromOption As enumClickOption
½Æ»s¥N½X ÂI¿ï¡i¿ï¾ÜªÑ²¼¦¬½L¦æ±¡¡j, show¤§«e¥[¤W¤@¦æ- Private Sub CommandButton1_Click()
- Unload Me
- ¿ï¾Ü¦¬½L¤é´Á.fromOption =opt¿ï¾ÜªÑ²¼¦¬½L¦æ±¡
- ¿ï¾Ü¦¬½L¤é´Á.Show
- End Sub
½Æ»s¥N½X ¨ä¥L«ö¶s¨Ì¦¹Ãþ±À
³Ì«á¡i¿ï¾Ü¦¬½L¤é´Á¡j½T©w®É¡A¦A§PÂ_¸ÓÅܼƨM©w°õ¦æþӦ欰 |
|