Подтверждение сообщения при нажатии кнопки

Question

У меня есть проблема, когда мой код очищается независимо от того, нажимаю я да или нет внутри окна сообщения. Я полагаю, что, возможно, смогу избавиться и от своих if-отчетов, и я не знаю, почему я включил их так

Private Sub btnClear_Click(sender As Object, e As EventArgs) Handles btnClear.Click
    If MsgBox("Are you sure?", MessageBoxButtons.YesNo, MessageBoxIcon.Question = DialogResult.Yes) Then

        If (chkLevel3Support.Checked) Then
            chkLevel3Support.Checked = False
        End If

        If (chkOnSiteTraining.Checked) Then
            chkOnSiteTraining.Checked = False
        End If

        If (chkCloudBackup.Checked) Then
            chkCloudBackup.Checked = False
        End If

        If (rdbYearlyLicense.Checked) Then
            rdbYearlyLicense.Checked = False
        End If

        If (rdbOneTIme.Checked) Then
            rdbOneTIme.Checked = False
        End If

        lbCostofLicenseOutput.Text = " "

        lbCostofOptionalOutput.Text = " "

        lbTotalCostSale.Text = " "
    End If
End Sub

Answer 1

Я думаю, что ваша правильная скобка в неправильном месте. Попробуйте это:

If MsgBox("Are you sure?", MsgBoxStyle.YesNo Or MsgBoxStyle.Question) = MsgBoxResult.Yes Then

или сделайте это. NET способом, предложенным Эндрю:

If MessageBox.Show("Are you sure?", "Confirm clear", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes Then