Private Sub txtdabh_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtdabh.KeyPress
Dim key As String key = e.KeyChar '检验按键是否为回车键,如果是就把焦点附给button1,并执行命令
If key = Microsoft.VisualBasic.ChrW(13) Then '触发事件
getinfobydabh(txtdabh.Text)
'SendKeys.Send("{TAB}")
End If
End Sub
本文介绍了一个简单的按键事件处理程序,该程序使用Visual Basic编写。当用户在名为txtdabh的文本框中按下回车键时,将触发特定的操作,即调用getinfobydabh函数并传递文本框内容作为参数。
3533

被折叠的 条评论
为什么被折叠?



