有时我们在操作程序时,想在按下回车键时就使下一个控件获得焦点而不是通过点击鼠标或按下TAB键实现。其具体原理比较简单,即当用户按下回车键时(KeyAscii为13),通过Send模拟按下一个Tab键即可。具体源代码如下:
Private Sub Text1_KeyPress (KeyAscii As Integer)
If KeyAscii = 13 Then
SendKeys “{tab}”
KeyAscii = 0
End If
End Sub
新闻热点
疑难解答