visual basic ampel schaltung
Frage: visual basic ampel schaltung(1 Antwort)
Nach dem Google keine richtigen Erfolge gebracht hat versuche ich`s einfach mal hier. nun nicht mehr recht mit. Ich soll eine ganz einfache Ampelschaltung machen. Jedoch ist das Problem das ich nicht so recht weiter komme. Es sollen mit 3 commandbuttons die ampelphasen rot rot und gelb und dann grün programmiert werden. Durch klick auf den ersten rot ,der 2 rot gelb und der 3 grün und die anderen beiden Ampel Lampen gehen "aus sollen wieder schwarz werden. So nun meine ich das ,dass ganze noch mit if then Else kombiniert wurde jedoch,da dass Thema noch neu ist ,habe ich keine so Rechte Idee wie ich das mache. Was ich hab bisher Privat sub Command1_click() Shape1.backcolor=farbcode rot End sub Privat sub Command2_click() Shape1.backcolor=farbcode rot Shape2.backcolor=farbcode gelb End sub Privat sub Command3_click() Shape1.backcolor=farbcode schwarz Shape2.backcolor=farbcode schwarz Shape3.backcolor=farbcode grün End sub Die "roh" Version habe ich ,jedoch ohne if Then else Vlt kann mir wer helfen |
Frage von Alexander109 | am 09.06.2015 - 14:16 |
Antwort von Colirbi | 09.06.2015 - 16:25 |
Moin, ich habe zwar keine VB Erfahrungen, aber im Grunde sind ja alle Programmiersprachen gleich. Soweit ich das verstehe sollst du wirklich 3 Buttons haben für 3 Phasen. Falls das der Fall ist kannst du folgendes machen. Ein if- else Konstrukt würde dir hier ersparen, dass du 3 Sub-Routinen machen musst, du würdest dabei mit einer auskommen. Da du sagst du kommst nicht so recht mit erkläre ich mal kurz wie if-else funktioniert: Das Statement sieht wie folgt aus: If [Bedingung] Then Do Sth. End If So das Programm überprüft zunächst deine Bedingung. Ist diese wahr, wird das Programm ab then weiter bis end if ausgeführt. Das ganze lässt sich nun noch mit else kombinieren: If [Bedingung] Then do sth. Else do sth else End If Ist deine Bedingung nicht wahr, so wird der if then Teil übersprungen und ab else bis end if weiter gemacht. Die Dritte Variante ist das was du nun brauchst. Ein sogenanntes elseif: If [Bedingung1] Then If [Bedingung1.1] Then do sth. Else do sth. else End If ElseIf [Bedingung2] Then If [Bedingung2.1] Then do sth. Else do sth. else End If Else do sth else. End If Und nun mal ein (sinnloses) Beispiel: If dayW = DayOfWeek.Wednesday Then If hour = 14 Or hour = 15 Then Return True Else Return False End If ElseIf dayW = DayOfWeek.Thursday Then If hour = 12 Then Return True Else Return False End If Else Return False End If Und nichts anderes brauchst du. Du schreibst nun statt 3 Routinen nur noch eine und fragst dann so etwas wie Button1clicked? Button2clicked? etc. |
9 ähnliche Fragen im Forum:
> Du befindest dich hier: Support-Forum - Informatik- Automatische Landung Visual Basic Access (0 Antworten)
- Programmieren mit Visual Studio: Videos oder DVD zum Lernen (2 Antworten)
- Informatik Hü über VBA in Excel (9 Antworten)
- visual basic `08 - zahlen sortieren (0 Antworten)
- C++ und Java lernen (2 Antworten)
- Informatik - Basic-Programm zum folgendem Struktogramm (2 Antworten)
- mehr ...
ÄHNLICHE FRAGEN:
- Automatische Landung Visual Basic AccessFunction Bewegungschritt_berechnen() Rem Funktion zur Bewegungsberechnung Dim v As Double, a As Double, h As Double Dim ..
- Programmieren mit Visual Studio: Videos oder DVD zum LernenHi, kennt sich jemand mit Visual Studio aus Gibt es zu den programmieren DVD/VIdeo zum Lernen Wie man z.B. ein "..
- Informatik Hü über VBA in ExcelHey Leute Wir haben von unserem Info Lehrer eine merkwürdige Hausübung bekommen. Es geht um VBA (Visual Basic Editor) in Excel..
- visual basic `08 - zahlen sortierenso also ich muss en prog. schreiben, bei dem man zahlen eingibt und diese danach der größe nach sortiert wieder ausgegeben ..
- C++ und Java lernenHey da ich etwas Zeit habe bis zum Wintersemester habe ich mich entschieden: Wieso nicht schonmal etwas anfangen mit den ..
- Informatik - Basic-Programm zum folgendem StruktogrammIch brauche jetzt eure Hilfe.. bitte hilft mir :( Hier das Struktogramm: Eingabe : A Setze i = 1 Setze Ergebnis = ..
- mehr ...
BELIEBTE DOWNLOADS:
- William Henry Bill Gates - BiographieDies ist ein sehr ausführliches Referat über den Gründer von Microsoft "William Henry Bill Gates". (Biographie) Gliederung: - ..
- mehr ...