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

¦p¦ó¨Ï¥Î¦h­ÓKeyCode~TextBox1.Activate¯à¨Ï¥Î°j°é¼¶¼g¶Ü?(¤w¸Ñ¨M¡A·PÁÂO¤j)

  1. Private Sub TextBox1_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
  2.   i = KeyCode
  3.   If i < 49 Or i > 57 Then Exit Sub
  4.   Me.OLEObjects("TextBox" & i - 41).Activate
  5. End Sub
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ¡i¦æµ½­n¤Î®É¡j¦æµ½­n¤Î®É¡A¥\¼w­n«ùÄò¡C¦p¿N¶}¤ô¤@¯ë¡A¥¼¿N¶}¤§«e¤d¸U¤£­n°±º¶¤õ­Ô¡A§_«h­«¨Ó´N¤Ó¶O¨Æ¤F¡C
ªð¦^¦Cªí ¤W¤@¥DÃD