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

[µo°Ý] TextBox¦p¦ó­­¨î¿é¤J½d³ò(µ{¦¡½X§ó§ï)

¦^´_ 1# liebe
  1. Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
  2. If KeyCode = 13 Then '«ö¤UEnterÁ䬰¿é¤J§¹¦¨
  3.    If TextBox1 < 21 Or TextBox1 >= 161 Then MsgBox "¶W¥X½d³ò" '§PÂ_¼Æ­È½d³ò
  4. End If
  5. End Sub
½Æ»s¥N½X
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

        ÀR«ä¦Û¦b : °µ¸Ó°µªº¨Æ¬O´¼¼z¡A°µ¤£¸Ó°µªº¨Æ¬O·Mè¡C
ªð¦^¦Cªí ¤W¤@¥DÃD