我有两个目标:
- 在文本框中按下输入开始搜索功能
- 在按钮上按空格键会执行单击(认为这是行为,似乎不是)
我以编程方式点击了搜索按钮的第一个目标,然后执行搜索功能:
Private Sub txtSearch_KeyDown(sender As Object, e As KeyEventArgs) Handles txtSearch.KeyDown
If e.KeyValue = Keys.Enter Then
btnSearch.PerformClick()
End If
End Sub
它有效,所以我尝试了第二个目标的相同方法:
Private Sub btnCancel_KeyDown(sender As Object, e As KeyEventArgs) Handles btnCancel.KeyDown
If e.KeyValue = Keys.Space Then
btnCancel.PerformClick()
End If
End Sub
这实际上什么也没做,有点选择按钮,但它不会触发button_click事件 我错过了什么吗?
答案 0 :(得分:1)
试试这个。
Dim btn As New MouseButtons 'create a new instance of mousebutton
Dim a As New MouseEventArgs(btn, 1, 1, 1, 1) 'simulate a click
If e.KeyValue = Keys.Space Then
Button1_MouseClick(sender, a)
End If
答案 1 :(得分:0)
你必须在Btncancel.Keydown()或Btncancel.KeyPress()事件之前调用BtnCancel.Focus()