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

[µo°Ý] ¦Û°Ê«ö¤U(Enter)Áä

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

TOP

        ÀR«ä¦Û¦b : ¥Í®ð¡A´N¬O®³§O¤Hªº¹L¿ù¨ÓÃg»@¦Û¤v¡C
ªð¦^¦Cªí ¤W¤@¥DÃD