在VB中结束程序时弹出一对话框，按取消后返回编辑。请问，这断返回代码怎样写
答案:1 悬赏:70 手机版
解决时间 2021-02-28 08:14
- 提问者网友：不爱我么
- 2021-02-27 22:02
在VB中结束程序时弹出一对话框，按取消后返回编辑。请问，这断返回代码怎样写
最佳答案
- 五星知识达人网友：妄饮晩冬酒
- 2021-02-27 23:32
Private Sub Form_Unload(Cancel As Integer)
On Error Resume Next
Dim s As Integer
i = MsgBox("确实要删除文件么？", vbYesNo +_
vbExclamation+vbSystemModal + vbDefaultButton2, "个人软件")
If i = vbno Then
Cancel = True
End If
End Sub
Cancel = True 将取消结束命令，窗口不关闭
On Error Resume Next
Dim s As Integer
i = MsgBox("确实要删除文件么？", vbYesNo +_
vbExclamation+vbSystemModal + vbDefaultButton2, "个人软件")
If i = vbno Then
Cancel = True
End If
End Sub
Cancel = True 将取消结束命令，窗口不关闭
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯