Hallo Leute,
wir müssen in der Schule eine Ampelphase mit Visual Basic programmieren. Ich möchte erstmal das die einzelnen Ampelphasen nacheinander und nach einer gewissen Zeit abfolgen. Also nach Case 0, folgt Case 1, darauf hin folgt Case 2, Case 3 und Ende. Bin aber total der Neuling, da wir erst seit 4 Stunden programmieren und wir uns mehr oder weniger alles selber beibringen müssen...
Die Ampel bleibt momentan bei Case 1 stehen...
Über ein, zwei Hilfestellungen würde ich mich sehr freuen...
wir müssen in der Schule eine Ampelphase mit Visual Basic programmieren. Ich möchte erstmal das die einzelnen Ampelphasen nacheinander und nach einer gewissen Zeit abfolgen. Also nach Case 0, folgt Case 1, darauf hin folgt Case 2, Case 3 und Ende. Bin aber total der Neuling, da wir erst seit 4 Stunden programmieren und wir uns mehr oder weniger alles selber beibringen müssen...
Die Ampel bleibt momentan bei Case 1 stehen...
Über ein, zwei Hilfestellungen würde ich mich sehr freuen...
C#-Quellcode
- Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
- Dim Ampel_Status As Integer = 0
- Ampel_Status += 1
- Select Case Ampel_Status
- Case 0
- Rot.Visible = True
- Gelb.Visible = False
- Grün.Visible = False
- Case 1
- Rot.Visible = True
- Gelb.Visible = True
- Grün.Visible = False
- Case 2
- Grün.Visible = False
- Gelb.Visible = False
- Grün.Visible = True
- Case 3
- Rot.Visible = False
- Gelb.Visible = True
- Grün.Visible = False
- End Select
- End Sub