Fehlermeldung: End of Anweisung erwartet

Question

Hallo Forum,

bin gerade auf Seite 66 meines VB-Lehrbuchs Version 2010 von Thomas Theis. Es geht um den Befehl "Select Case". Hier gibt es ein kleines Miniprogramm zu diesem Thema, was ich abgetippt habe. Ich denke den Inhalt des Programms muss ich nicht länger erklären. Leider kommen zwei Fehlermeldungen, nämlich "end-of Anweisung wird erwartet". Im Buch steht davon jedoch nichts. Wo kommt diese hin? 

Vielen Dank im Voraus. Grüße Rainer

Public Class Form1

    Private Sub cmdanzeige_Click(sender As System.Object, e As System.EventArgs) Handles cmdanzeige.Click
        Dim x As Integer
        x = 6
        Select Case x
            Case 1, 3, 5, 7, 9 lblAnzeige.Text = "Ungerade. Einstellig"

            Case 2, 4, 6, 8 lblAnzeige.Text = "Gerade. Einstellig"

        End Select
    End Sub
End Class

Answer 1

Hallo, VB.NET benötigt, anders als C#, Zeilenumbrüche (oder Doppelpunkte) um die meisten Befehle zu unterscheiden. D.h. Füge je einen Zeilenumbruch nach den Case-Bedingungen hinzu:

Case 1, 3, 5, 7, 9 
    lblAnzeige.Text = "Ungerade. Einstellig"
Case 2, 4, 6, 8 
    lblAnzeige.Text = "Gerade. Einstellig"

Geht natürlich auch mit den Doppelpunkten, ist aber meistens weniger leserlich:

Case 1, 3, 5, 7, 9 : Console.WriteLine("Ungerade. Einstellig")
Case 2, 4, 6, 8 : Console.WriteLine("Gerade. Einstellig")

---

<Code-13/>- Koopakiller [kuːpakɪllɐ] (Tom Lambert)
Webseite | Code Beispiele | Facebook | Twitter | Snippets   C# ↔ VB.NET Konverter
Markiert bitte beantwortende Posts als Antwort und bewertet Beiträge. Danke.

Answer 2

Hallo Koopakiller,

vielen Dank. Funktioniert jetzt natürlich.

Rainer