Question

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

Answer 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

追问

谢谢

Answer 2

end 就是关闭

追问

运行后怎样用键盘上的键控制退出程序？？？自己设置。该如何设置？