- ©«¤l
- 38
- ¥DÃD
- 14
- ºëµØ
- 0
- ¿n¤À
- 66
- ÂI¦W
- 0
- §@·~¨t²Î
- Win7
- ³nÅ骩¥»
- Excel2003
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2012-7-16
- ³Ì«áµn¿ý
- 2013-9-3
|
[µo°Ý] TextBox©w¿é¤JȪº½d³ò
½Ð±Ð¦U¦ì¤j®v¡A§Ú¦³»s§@¤@Ó Textbox¡AµM«á·Q©w¥Î¤á¿é¤JªºÈ¤£¯à >80¡I
¥i¬O§Úµo²{¡A§Ú¿é¤J < 80 «á¡A½T¹ê·|¦³ Msgbox ¥X²{¡A¦ý¬OÃö³¬«á¡AMsgBox ¤S·|¥X²{¤@¦¸~~
·|¤£·|¬O textbox32.Value = "" ªº°ÝÃD¡H
¦n¹³¨S¿é¤JÈ¡A¤]·|Åã¥Ü MsgBox¡I- Private Sub textbox32_Change()
- If textbox32.Value > 80 Then
- textbox32.Value = ""
- a = MsgBox("Please Fill in Duty < 80", 0 + 48, "NOTE¡I¡I")
- End If
- End Sub
½Æ»s¥N½X |
|