窗体的unload

hh014 2003-08-19 10:50:07
我想知道在一个子窗体弹出后,按ESC键实现该子窗体的unload.
...全文
45 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
射天狼 2003-08-19
  • 打赏
  • 举报
回复
或者将窗口的KEYPREVIEW属性设为TRUE然后在窗口的KEYDOWN事件里判断是否按ESC键
例:

Option Explicit

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 27 Then Unload Me
End Sub

Private Sub Form_Load()
Me.KeyPreview = True
End Sub
射天狼 2003-08-19
  • 打赏
  • 举报
回复
加一个按钮,将按钮的Cancel属性设为True
hh014 2003-08-19
  • 打赏
  • 举报
回复
谢谢

1,451

社区成员

发帖
与我相关
我的任务
社区描述
VB 控件
社区管理员
  • 控件
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧