Question

VB.NET 窗体关闭问题 用的是vs2013

Private Sub Form1_FormClosed(sender As Object, e As FormClosedEventArgs) Handles Me.FormClosed
Dim a As Integer
a = MsgBox("确认退出程序", 49, "提示")
If a = MsgBoxResult.Ok Then

End
Else
Exit Sub
End If

End Sub
为什么 点取消还是会关闭窗体 exit sub 不加也一样 帮忙写一个窗体关闭的代码
form1_formcloseing 试过也一样的问题

Answer 1

首先这个应该放在 FormClosing 事件中。

其次，因为你 Else 之后没有忽略窗体关闭的请求。

应该再加一句 e.Cancel = True，表示告诉系统，我取消关闭窗体这个操作了。

Answer 2

Private Sub Form1_FormClosed(sender As Object, e As FormClosedEventArgs) Handles Me.FormClosed
Dim a As Integer
a = MsgBox("确认退出程序", 49, "提示")
If a = MsgBoxResult.Ok Then

End
Else
e.cancel=true
End If

End Sub

Answer 3

把exit sub 那句改成 e.Cancel = True 就行了