求教个问题
小弟初学VB，请教各位这段代码是什么意思
Private Sub Text_1 KeyPress(Index As Integer, KeyAscii As Integer)
i = Index+1
If i >=6 Then i = 0
If KeyAscii = 13 Then
Text1(i).SetFocus
End If
End Sub
小弟初学VB，请教各位这段代码是什么意思
Private Sub Text_1 KeyPress(Index As Integer, KeyAscii As Integer)
i = Index+1
If i >=6 Then i = 0
If KeyAscii = 13 Then
Text1(i).SetFocus
End If
End Sub
2004-09-01 08:18
Private Sub Text1_KeyPress(Index As Integer, KeyAscii As Integer)
i = Index+1
If i >=6 Then i = 0
If KeyAscii = 13 Then
Text1(i).SetFocus
End If
End Sub
是不是有六个textbox作为一个控件组，然后按键盘上的键，按到回车的时候把焦点叫给i对应的那个textbox
2004-09-24 18:57
Private Sub Text_1 KeyPress(Index As Integer, KeyAscii As Integer) 这句代码我想是你不小心打错了，应为： Private Sub Text1_KeyPress(Index As Integer, KeyAscii As Integer) 下面是解答你提出的问题:
[IMG]C:\Documents and Settings\Owner\My Documents\My Pictures\VB解答1.JPG[/IMG]
2004-09-27 18:21