Msgbox Result immer Ok ??

[Vertax]

Hallo nochmal,

Ich möchte gerne über ne MsgBox abfragen ob wirklich eine Aktion ausgeführt werden soll. Das ist ja auch eigentlich nicht schwer. Nur Kann ich über

MsgBox("Test", MsgBoxStyle.Exclamation, MsgBoxStyle.OkCancel, "ss")

dies nicht machen da dies zu viele argumente ja sind. Hätte hält gerne noch das Ausrufezeichen mit dabei. Hab dann das ganze so gemacht:

MessageBox.Show("Wollen Sie wirklich die Datenbank löschen?" & vbNewLine & _
        "Alle gespeicherten Daten werden gelöscht!", "Warnung !", _
        MessageBoxButtons.OKCancel, _
        MessageBoxIcon.Warning, _
        MessageBoxDefaultButton.Button2)

        If MsgBoxResult.Ok Then
            Dim xml As System.Xml.XmlDocument ' Unser Document Container

            xml = New System.Xml.XmlDocument
            xml.LoadXml("<?xml version=""1.0""?>" & _
              "<Sprachen>" & _
              "</Sprachen>")
            xml.Save("Code.xml")


            xml = New System.Xml.XmlDocument
            xml.LoadXml("<?xml version=""1.0""?>" & _
              "<Nodes>" & _
              "</Nodes>")
            xml.Save("Nodes.xml")
            tvCodeSelect.Nodes.Clear()
            rtbCode.Text = ""
            txtBeschreibung.Text = ""
        End If

Nur leider liefert mir die Überprüfung der MsgBoxResult immer den Wert Ja, selbst wenn der Benutzer auf abbrechen drückt.

An was könnte das liegen?

[gfoidl]

Hallo,

das geht so:
[highlight=vb.net]
If MessageBox.Show( _
"Datenbank wirklich löschen?", _
"Warnung!", _
MessageBoxButtons.YesNoCancel, _
MessageBoxIcon.Question) = DialogResult.Yes Then

' Datenbank löschen:
End If
[/highlight]

mfG Gü