Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing If MsgBox("确认关闭?", vbYesNo, "提示") = vbNo Then e.Cancel = True Else Me.Dispose() End If End Sub
转载于:https://www.cnblogs.com/kingangWang/archive/2012/05/08/2489596.html