visual basic如何设置窗体在按下ESC键后关闭,我需要源代码,谢谢

2024-11-26 19:23:08
推荐回答(2个)
回答1:

给你个方法吧,源代码就得把窗体设计文件和程序都给你,不想弄了

窗体上放一个按钮,将Cancel属性设置为True
在Load事件中将按钮放到可见区域之外,比如 Left=-10000, Top=-10000
在按钮的Click事件中,加入 Unload Me语句

这样在打开窗体之后按Esc键就关闭了

回答2:

下面,的就可以了!
Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
If KeyCode = 27 Then End '27就是Esc
End Sub
Private Sub Form_Load()
Me.KeyPreview = True
End Sub