VB 键盘和commandButton

来源：百度知道 编辑：UC知道 时间：2024/06/01 22:09:21
已经在commandButton_click()里面写了代码 代码功能比如就是text1.text="123451"
这样我们用鼠标指针单击按键commandButton的时候文本框text1的内容就变为123451
那要怎么做才能达到我们按下字母键盘中的“a”按键后就相当于用鼠标指针单击按键commandButton

1、设置Form中的KeyPriview属性为True
2、复制下面代码，即可实现上述功能
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If Chr(KeyCode) = "a" Then Call commandButton_click
End Sub

Private Sub FORM1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
Select Case e.KeyCode
Case Keys.A
MSGBOX("A")
End Select
End Function
这个大概可以

找一个经常获得焦点的控件数组为触发事件
例如按钮数组,把程序的所有按钮做成数组你会发现很方便的...

Private Sub Command1_KeyPress(Index As Integer, KeyAscii As Integer)
If KeyAscii = 97 Then Call Command1_Click(0)
End Sub

大哥，你这个是vb6还是vb.net啊？