＋设为首页 ＋添加到收藏夹
初学vb，在输出框有点疑问：
比如，记事本中点击退出，就有一个“保存，不保存，取消”的对话框，当点击取消时，不能让它退出，仍然停留在记事本中，
现有一事不明，在使用vbyesnocancel时，对cancel采取什么事件，才会产生上述效果
你试试这句
ii = MsgBox("该序号的文件已存储过，是否要重新保存！", 4 + 32 + 256)
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Dim iOk As Integer
iOk = MsgBox("是否退出保存？", vbYesNoCancel)
Select Case iOk
Case vbYes
Case vbNo
Case vbCancel
Cancel = True
End Select
End Sub
