PDA

View Full Version : حرکت در text Box با دکمه ها



silverado
دوشنبه 06 اردیبهشت 1389, 19:13 عصر
سلام . یه برنامه دارم که توش چند تا textbox هست . می خوام هم با کلید های بالا و پایین مثل tab توش حرکت کرد . اگه کمک کنید ممنون می شم .

aryasoft2872
دوشنبه 06 اردیبهشت 1389, 20:27 عصر
Private Sub Text_KeyDown(Index As Integer, KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyDown Then
If Index <> Text.UBound Then
Text(Index + 1).SetFocus
Else
Text(0).SetFocus
End If
End If
End Sub

ehsanocx
دوشنبه 06 اردیبهشت 1389, 22:24 عصر
توی خاصیتkeypress , text boxet این کد رو بذار

If KeyAscii = vbKeyReturn Then
SendKeys ("{Tab}")
KeyAscii = 0
End If

اونوقت با enter میره به تکست دیگه