- ©«¤l
- 561
- ¥DÃD
- 160
- ºëµØ
- 0
- ¿n¤À
- 725
- ÂI¦W
- 0
- §@·~¨t²Î
- WINDOWS
- ³nÅ骩¥»
- xp
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ®ç¶é
- µù¥U®É¶¡
- 2014-9-10
- ³Ì«áµn¿ý
- 2024-8-7
  
|
dear all ¤j¤j
1. YRANGEÀx¦s®æµLªk²£¥Í"¬P¦r¸¹"®ÄªG
1.1 §ï¦p¹Ï¤@»Ý¨D¸g¿ì©óINPUTµøµ¡¿é¤J±K½X®É¨q¥X"¬P¦r¸¹"(¤£¨q¥X±K½X^¤å¼Æ¦r»P¤å¦r)
2.¦p¦ó³]©w.·Ð¤£§[½ç±Ð thanks*10000
¹Ï¤@
Sub Macro9()
Dim pw
pw = InputBox("½Ð¿é¤J±K½X: ")
If pw <> "1234" Then
MsgBox "±K½X¿ù»~¡A¥¨¶°¤¤¤î": Exit Sub
End If
End Sub |
|