Guten Abend,
ich hab da folgende Frage kann man mehrere Select Case abrfragen
zusammenpacken?
Hier mal ein Bsp.:
Dim w as byte
Dim K as byte
Select Case w
Case 1: Print "test1"
case 20: Print "test10"
case else Select case k
Case 5: Print "test5"
case 7: Print "test55"
CASE ELSE: print " kein Wert"
end select
end select
end
Würde das so gehen oder muß ich das anders schreiben?
MfG
Steven.
Gast
#1389495
Bei den Bascom_Samples is dafür n Beispiel gegeben. MfG Echo
Gast
#1389530
Hi kommt denn nicht hinter dem zweiten case else ein Doppelpunkt? case else: Select case k Ich kann es leider nicht ausprobieren.
mh... das bringt mich auf eine idee! Hatte vorher keins da stehen so wie oben, muß ich gleich mal ausprobieren...
mh hat auch nicht funktioniert mit dem Doppelpunkt. @ echo Wie heist denn das Sample dafür? Das Sample Case.bas hilft mir hier nicht weiter! MfG
So habs, nochmal probiert
Sieht jetzt folgendermassen aus, habs auch Allgemeingeschrieben
Select Case Pinc
Case 1 : [Befehl]
Case 7 : [Befehl]
Case Else : Select Case Pind
Case 28 : [Befehl]
[Befehl]
Case 24 : [Befehl]
[Befehl]
Case Else : [Befehl]
End Select
End Select
Der Doppelpunkt war richtig, nur gibts auf dem Board von
Mikroelektronika störeinflüsse und da an PinD der RX mit dran hängt hab
ich dadurch immer einen Falschen Wert für die Abfrage erhalten. Dieser
sorgt nämlich dafür das sich der Wert, der verglichen werden soll, um +1
verschiebt.
Nochmals Danke