我用vb写了个程序。。。无法直接关闭的。。。怎样设置快捷键让它关闭???谢谢

2025-05-21 04:46:39
推荐回答(2个)
回答(1):

Private Sub Form_Load()
    Me.KeyPreview = True'//激活按键事件
End Sub
'用窗体的KeyPress 事件:
Private Sub Form_KeyPress(KeyAscii As Integer)
    If KeyAscii = 17 Then
        MsgBox "你按下了Ctrl+Q"
         '//此处写退出
        unload me
    End If
End Sub
'由于单按下某个键和双按下某个键的KeyAscii 值都会是不同的.所以你要一个一个找出这些KeyPress 值就可以了(用Caption 显示).比如上面的CTRL+Q 的值是:17

回答(2):

end 就是关闭