Registrierung Kalender Mitgliederliste Teammitglieder Suche Häufig gestellte Fragen Zur Startseite

Informatiker Board » Themengebiete » Praktische Informatik » visual basic Ampel schaltung » Antwort erstellen » Hallo Gast [Anmelden|Registrieren]

Antwort erstellen
Benutzername: (du bist nicht eingeloggt!)
Thema:
Nachricht:

HTML ist nicht erlaubt
BBCode ist erlaubt
Smilies sind erlaubt
Bilder sind erlaubt

Smilies: 21 von 33
smileWinkDaumen hoch
verwirrtAugenzwinkerngeschockt
Mit ZungeGottunglücklich
Forum Kloppebösegroßes Grinsen
TanzentraurigProst
TeufelSpamWillkommen
LehrerLOL HammerZunge raus
Hilfe 
aktuellen Tag schließen
alle Tags schließen
fettgedruckter Textkursiver Textunterstrichener Text zentrierter Text Hyperlink einfügenE-Mail-Adresse einfügenBild einfügen Zitat einfügenListe erstellen CODE einfügenPHP CODE farbig hervorheben
Spamschutz:
Text aus Bild eingeben
Spamschutz

Der letzte Beitrag
Jessi98 visual basic Ampel schaltung

Meine Frage:
Nach dem Google keine richtigen Erfolge gebracht hat versuche ich's einfach mal hier.

Ich geh noch zur Schule dort haben wir mit Visual Basic angefangen, jedoch komme ich
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.


Die "roh" Version habe ich ,jedoch ohne if Then else

Vlt kann mir wer helfen

Meine Ideen:
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