none
MessageBox Problem! RRS feed

  • Frage

  • Liebe Leute,

    ich habe ein Problem. Wenn man auf einen Button in meiner Form klickt, soll eine MessageBox auftauchen mit der Wähloption JA/NEIN. Auf dem JA Knopf möchte ich eine Anweisung packen, der Timer3 stoppt. Bei NEIN soll nichts passieren.

    Hab schon was gecoded, klappt aber nicht. Mache ich ein extra Button auf die Form mit timer3.stop gehts, ich möchte aber die MessageBox!

    Mein Code der nicht funktioniert! :

    Private Sub Stop_button_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Stop_button.Click

     
            Dim Result As DialogResult
     
            MediaPlayer1.Close()
     
            MessageBox.Show(" Alle Termine Abbrechen? ", "Achtung", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
     
            If Result = Windows.Forms.DialogResult.Yes Then
     
                Timer3.Stop()
     
            End If
     
            Me.Refresh()
     
        End Sub

    thx im Vorraus
    Mittwoch, 11. Oktober 2006 08:21

Antworten

  • Hallo ModiHo,

    leider hast du einen klassischen Fehler gemacht. Du hast die Variable Result zwar deklariert, ihr aber keinen Wert zugewiesen. Probiere es mal so:

    Dim Result As DialogResult
     
            MediaPlayer1.Close()
     
            Result = MessageBox.Show(" Alle Termine Abbrechen? ", "Achtung", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
     
            If Result = Windows.Forms.DialogResult.Yes Then
     
                Timer3.Stop()
     
            End If
     
            Me.Refresh()
     
        End Sub

    Sol sollte es eigentlich funktionieren.

    Cu leth

    Mittwoch, 25. Oktober 2006 18:00