Hi,
ich habe ein kleines problem immer wenn ich dieses prog (nur ein teil) im simulator laufen lasse bekomme ich das zurück "10.Taste". aber irgend wie kann das doch nicht sein oder. ich weiss es ist keine musterlösung aber naja.

Code:
........
Const keys = 10
.......
Do

 Schloss:
 For T = 1 To Keys
  Key = T
  Select Case Key
  Case 0 : Debounce Pina.1 , 1 , Display_key , Sub
  Case 1 : Debounce Pina.2 , 1 , Display_key , Sub
  Case 2 : Debounce Pinb.1 , 1 , Display_key , Sub
  Case 3 : Debounce Pinb.2 , 1 , Display_key , Sub
  Case 4 : Debounce Pinb.3 , 1 , Display_key , Sub
  Case 5 : Debounce Pinb.4 , 1 , Display_key , Sub
  Case 6 : Debounce Pinb.5 , 1 , Display_key , Sub
  Case 7 : Debounce Pinb.6 , 1 , Display_key , Sub
  Case 8 : Debounce Pinb.7 , 1 , Display_key , Sub
  Case 9 : Debounce Pinb.0 , 1 , Display_key , Sub


  End Select

  Next



Display_key:
    Print Key ; ". Taste"
        Return
.....................
kann mir jemand helfen meine keine ahnung was das jetzt schon wieder ist phase zu erleuten.

mfg M.R.