比如按下F1的时候打开Form2
如果是两个键呢？比如按下ctrl+1打开Form2
VB怎么点击键盘上的一个键等于执行一个命令
答案:3 悬赏:60
解决时间 2021-03-03 02:55
- 提问者网友：乏味沐染
- 2021-03-02 14:17
最佳答案
- 二级知识专家网友：劳资的心禁止访问
- 2021-03-02 14:58
Private Sub Form_Load()
Me.KeyPreview = True
End Sub
Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyF1 Then 'F1
Form2.Show
ElseIf KeyCode = vbKey1 And Shift = 2 Then 'Ctrl+1
Form2.Show
End If
End Sub
这个只是简单的方法，如果要更高级的，比如在其他软件的界面上按下F1，也能打开你的软件的Form2，就要用到系统全局热键了，在此忽略不表。
Me.KeyPreview = True
End Sub
Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyF1 Then 'F1
Form2.Show
ElseIf KeyCode = vbKey1 And Shift = 2 Then 'Ctrl+1
Form2.Show
End If
End Sub
这个只是简单的方法，如果要更高级的，比如在其他软件的界面上按下F1，也能打开你的软件的Form2，就要用到系统全局热键了，在此忽略不表。
全部回答
- 1楼网友：末路丶一枝花
- 2021-03-02 16:08
设置菜单的快捷键
- 2楼网友：摧毁过往
- 2021-03-02 15:12
思路是
判断语句，事件写在keypress时间里，判断keyascii，再执行相应的语句
if keyascii= ...，then
form1.show
最好用select case
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯