vb 退出窗口提示

引用 ：http://zhidao.baidu.com/question/73897568.html

Private Sub Form_Unload(Cancel As Integer)
    If MsgBox("是否退出？", vbYesNo) = vbNo Then Cancel = 1
End Sub

转载于:https://www.cnblogs.com/sode/archive/2011/12/09/2281744.html