Das geht so:
Wenn deine Taste erkannt wird, dann zählt eine Variable hoch, die du dann wieder auswertest. (Select Case...)
Je nach Wert kommt dann hat ein anderes GoSub.
Per If Then kannst du beim Hochzählen einen Maximalwert festlegen (max. Programmnummer) - bei einem Überlauf geht er dann wieder auf das 1. Programm.
Wichtig ist, dass du die Taste entprellst, weil du sonst 100x die Sekunde schaltest.
Am saubersten wird es mit einem Interrupt für die Taste, dann muss er sie nur abfragen, falls sie auch wirklich gedrückt wird.
Lesezeichen