Bascom Select Case Abfrage?

[Steven Z. (steven84)]

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.

[Echo (Gast)]

Bei den Bascom_Samples is dafür n Beispiel gegeben.

MfG Echo

[Bascomfreund (Gast)]

Hi
kommt denn nicht hinter dem zweiten case else ein Doppelpunkt?
 case else: Select case k
Ich kann es leider nicht ausprobieren.

[Steven Z. (steven84)]

mh... das bringt mich auf eine idee! Hatte vorher keins da stehen so wie 
oben, muß ich gleich mal ausprobieren...

[Steven Z. (steven84)]

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

[Steven Z. (steven84)]

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