作者在 2008-08-04 17:05:17 发布以下内容
在text1中输入数字后按回车跳到text2中输入……直到确定！
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text2.SetFocus
End If
End Sub
如果想设置回车键等于commond1_click怎么设置
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text2.SetFocus
End If
End Sub
如果想设置回车键等于commond1_click怎么设置
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
call command1_click
End If
End Sub
If KeyAscii = 13 Then
call command1_click
End If
End Sub
回车键的KeyAscii 是13