VB程序如何实现程序按"Esc"键退出？
4个回答
展开全部
Private Sub Form_Load()
Me.KeyPreview = True
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 27 Then End
End Sub
Me.KeyPreview = True
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 27 Then End
End Sub
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
其它同楼上:
Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 27 Then
End
End If
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 27 Then
End
End If
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
将 FORM 的 KEYPREVIEW 设为 TRUE。
在 KEY_PRESS 里处理就可以了
在 KEY_PRESS 里处理就可以了
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
两位回答都对啊.
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
更多回答（2）
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
