Visual Basic中的E.cancel循环

时间:2012-08-27 11:03:59

标签: vb.net

我正在制作服务器控制应用程序(使用一些按钮来启动/停止服务器很简单) 当用户想要关闭应用程序时,将会提示确认框。

Private Sub Form1_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing

    Dim response As Integer
    response = MsgBox("Are you sure you want to stop the server", vbYesNo, "Stop Server ?")
    If response = vbYes Then
        Shell("cscript ""stop.vbs""", 1)
        Close()
    Else
        e.Cancel = True
    End If
End Sub

这就是我现在的代码。 但是当我启动应用程序并使用“X关闭”或“关闭窗口”关闭它时,系统会提示我,直到我点击“否”,然后它将关闭。 它是一个循环,当你第一次点击是,然后点击否时它会停止。

有人可以帮我解决这个问题吗?

1 个答案:

答案 0 :(得分:4)

只需删除Close()来电,因为Form已经关闭。没必要那样做。