可以的Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = 27 and Shift = 0 Then Unload Me End If End Sub
就是没有办法读取,我想通过From来接收这一事件,是不是form本身不能读取,还是我写错了,我试过N次了。什么 Form_KeyPress(KeyAscii As Integer) Form_KeyUp(KeyCode As Integer, Shift As Integer) 都无效,没反应。 再帮我看看。
If KeyCode = 27 and Shift = 0 Then
Unload Me
End If
End Sub
Form_KeyPress(KeyAscii As Integer)
Form_KeyUp(KeyCode As Integer, Shift As Integer)
都无效,没反应。
再帮我看看。
但是:
随便加个TextBox什么的就不行了。
可能Focus回不到Form本身,
我的需求是
写到一半时不对按ESC退出
焦点可能在button上,也可能在其他控件上。
keypreview=true