16,554
社区成员
发帖
与我相关
我的任务
分享
'命名要和事件一致
Private Sub LoginForm_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
If MsgBox("确认关闭程序?Ese是关闭快捷键", MsgBoxStyle.OkCancel, "警告") = MsgBoxResult.Ok Then
ModuleShengming.main() '<- 既然是关闭程序,怎么会有个 Main()?异次元的逻辑理解不能……'
'LoginForm.Close() '<- 已经开始关闭了,就不需要再关一次'
Else
e.Cancel = True '<- 只有点了Cancel按钮才需要阻止关闭'
End If
End Sub