VB Text框按回车转到下个Text
3个回答
展开全部
楼上那个……人家说的是组。
给个伪代码吧没装vb。
Private Sub Text1_KeyPress(KeyAscii As Integer,i as integer)
If KeyAscii = 13 Then
KeyAscii = 0
text1(i+1).setfocus
end if
end sub
给个伪代码吧没装vb。
Private Sub Text1_KeyPress(KeyAscii As Integer,i as integer)
If KeyAscii = 13 Then
KeyAscii = 0
text1(i+1).setfocus
end if
end sub
追问
谢谢啊,问题解决了
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
文本框 不行建议:
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
KeyAscii = 0
Text2.SetFocus
Exit Sub
End If
End Sub
如果表格控件可以
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
KeyAscii = 0
Text2.SetFocus
Exit Sub
End If
End Sub
如果表格控件可以
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then Text2.SetFocus
End Sub
If KeyCode = 13 Then Text2.SetFocus
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询