Question

因此，当用户通过点击按钮恢复其设置时，我尝试关闭我的应用中的所有表单，但它并不顺利，因为出于某种原因，当我尝试关闭它们时发生的情况。

我检查过输出并没有注意到任何内容，奇怪的是，如果我在没有if语句的情况下关闭我的表单，它就可以了。什么了？

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
    Dim result As DialogResult = MessageBox.Show("Are you sure you want to revert all your settings? There is no undo, and if you click yes, WikiFinder will restart.", "WikiFinder", MessageBoxButtons.YesNo)
    If (result = DialogResult.OK) Then
        My.Settings.MenuColor = System.Drawing.Color.FromArgb(248, 24, 0)
        My.Settings.MenuTextColor = Color.White
        My.Settings.Siggy = ""
        My.Settings.Save()
        WebForm.Close()
        ForumSiggy.Close()
        URLform.Close()
        MenuForm.Close()
        Me.Close()
    Else
    End If
End Sub

Answer 1

您没有输入If块，因为您的对话框是“是”/“否”，“确定”。使用

result= DialogResult.Yes

通过调试很容易确定。

出于某种原因，我无法在if语句中关闭表单？

1 个答案: