请问,vb中点击了窗体上的关闭按钮会触发什么事件

请问,点击了窗体上的关闭按钮会触发什么事件,如果我想在点击了关闭关闭按钮后弹出一个msgbox,上面有两个按钮,一个“是”,一个“否”,我应该如何编写代码在选择了“是”后... 请问,点击了窗体上的关闭按钮会触发什么事件,如果我想在点击了关闭关闭按钮后弹出一个msgbox,上面有两个按钮,一个“是”,一个“否”,我应该如何编写代码在选择了“是”后窗体不关闭 展开
 我来答
xiaoyuemt
2011-02-22 · TA获得超过1.6万个赞
知道大有可为答主
回答量:3202
采纳率:64%
帮助的人:1683万
展开全部
Private Sub Form_QueryUnload(Cancel As Integer, unloadmode As Integer)
If MsgBox("你真的要退出吗? ", vbOKCancel) <> vbOK Then Cancel = True
End Sub

Private Sub Form_Unload(Cancel As Integer)
If MsgBox("你真的要退出吗? ", vbOKCancel) <> vbOK Then Cancel = True
End Sub
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
120203851
2011-02-22 · TA获得超过649个赞
知道小有建树答主
回答量:459
采纳率:100%
帮助的人:666万
展开全部
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
If MsgBox("你真的要退出吗?", vbOKCancel, "提示") = vbCancel Then
Cancel = True
End If
End Sub
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
况知慧9j
2011-02-22 · 超过67用户采纳过TA的回答
知道小有建树答主
回答量:275
采纳率:0%
帮助的人:0
展开全部
Private Sub Form_Unload(Cancel As Integer)
If Cancel = 0 Then
a = MsgBox("不能关闭此窗口", "68")
If a = 6 Then
Cancel = 1
End If
End If
End Sub
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
邂逅的守望
2011-02-22 · TA获得超过109个赞
知道小有建树答主
回答量:233
采纳率:0%
帮助的人:135万
展开全部
Private Sub Form_Unload(Cancel As Integer)
IF MSGBOX("是否关闭?",vbyesno) =vbno then cancel=true
End Sub
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式