- ©«¤l
- 228
- ¥DÃD
- 73
- ºëµØ
- 2
- ¿n¤À
- 333
- ÂI¦W
- 0
- §@·~¨t²Î
- Windows 10
- ³nÅ骩¥»
- Office 2000, 2019
- ¾\ŪÅv
- 100
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¹ü¤Æ¿¤
- µù¥U®É¶¡
- 2013-7-18
- ³Ì«áµn¿ý
- 2024-10-13
|
Private Sub TextBox1_Change()
If Len(CStr(TextBox1.Value)) = X Then
SendKeys "{Enter}"
End If
End Sub
«Øij§âEnterªº¥\¯àª½±µ¥Î§Oªº¤è¦¡¨ú¥N¡A¦]¬°SendKeys¦³³\¦h³Â·Ð¡C
WIN7¨t²Î¤U¡AVB¤¤ªºsendkeys©R¥OµLªk¨Ï¥Î¡A´£¥Ü¡§¹ê®É¿ù»~70 ©Ú絶ªºÅv¡¨
¸Ñ¨M¤èªk¡GWindows 7 UACº|¬}¡AÃö³¬Windows 7 UACªºVBS |
|