Frage von L8u7476, 92

Visual Basic: Was habe ich falsch gemacht?

Unzwar will ich das wenn das 5. und 6. Label Grün ist soll ein 7.label auch grün werden...Was habe ich vergessen oder falsch gemacht?:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 

If Label5.BackColor = Color.LightGray Then Label5.BackColor=Color.LawnGreen ElseIf Label5.BackColor = Color.LawnGreen Then Label6.BackColor = Color.LawnGreen ElseIf Label6.BackColor = Color.LawnGreen Then Label7.BackColor = Color.LawnGreen End If End Sub

Hilfreichste Antwort - ausgezeichnet vom Fragesteller
von horstfh, 35

Folgende drei Zeilen lösen diese Aufgabe

  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If Label6.BackColor = Color.LawnGreen Then Label7.BackColor = Color.LawnGreen
If Label5.BackColor = Color.LawnGreen Then Label6.BackColor = Color.LawnGreen
Label5.BackColor = Color.LawnGreen
End Sub

Oder was solls noch sein?
Dann melde Dich!

Gruß
Horst


Kommentar von L8u7476 ,

Erstmal danke für die Antwort. Das Ding ist nur das wenn ich nach deinem Code gehe, wird beim 2. Klicken das 2. und 3. Label gleichzeitig Grün

Kommentar von horstfh ,

Dann hast Du die Zeilenfolge nicht korrekt.

Es geht doch so:

  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
' 3. Klick: Label6 Grün wird Label7 Grün
If Label6.BackColor = Color.LawnGreen Then Label7.BackColor = Color.LawnGreen

' 2. Klick: Label5 Grün wird Label 6 Grün
If Label5.BackColor = Color.LawnGreen Then Label6.BackColor = Color.LawnGreen

' 1. KLick: wird Label5 Grün
Label5.BackColor = Color.LawnGreen
End Sub
Kommentar von L8u7476 ,

Danke hast mir sehr weiter geholfen

Kommentar von L8u7476 ,

Irgendwie hatte ich ne blockade :)

Keine passende Antwort gefunden?

Fragen Sie die Community

Weitere Fragen mit Antworten