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

[µo°Ý] Ãö©ó«ü©wtextbox1~¦ý¬O¨S¦³¤ÏÀ³!

[µo°Ý] Ãö©ó«ü©wtextbox1~¦ý¬O¨S¦³¤ÏÀ³!

Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    If KeyCode = 27 Then
    TextBox1 = ""
    TextBox1.Activate
    End If
End Sub

·|ªº³á¡I§A«ü©wªº¬OescÁä¡A«ö¤U¥h´N·|¸õ¨ìtextbox1¡A¨Ã¦³¤@ª½½u°{Ã{¡C

TOP

¦^´_ 2# oobird


    ÁÂÁ¤j¤j~·|¥X²{"ª«¥ó¤£¤ä´©¦¹Äݩʤèªk"
¥i¯à§Úªí¹Fªº¤£°÷²M·¡~§Ú¬O§Æ±æ¥L·|©M§Ú­Ì¥Î·Æ¹«ÂI¤@¤Utextbox1¤@¼Ë~µM«á·|¦³­Óª½½u¤@ª½°{Ã{¨º¼Ë!

TOP

TextBox1.SetFocus
TextBox1.Activate~¨S¦³³o­ÓÄÝ©Ê

TOP

        ÀR«ä¦Û¦b : ¤@­Ó¤Hªº§Ö¼Ö¡D¤£¬O¦]¬°¥L¾Ö¦³±o¦h¡A¦Ó¬O¦]¬°¥L­p¸û±o¤Ö¡C
ªð¦^¦Cªí ¤W¤@¥DÃD