Hallo Joachim,
dein Programm läuft jetzt nach dem Stellen wieder auf das Return. Das funktioniert so nicht.
Du könntest aus dem Goto Set_alarm mal ein Gosub Set_alarm machen.
Nach dem Ende des Stellens würde er aufgrund des Return zurück hinter den Gosub Befehl springen.
Habe ich mir jetzt aber noch nicht angesehen, was dann passieren würde.

Edit: Willst du eigentlich die Taste TA_mode drücken um in den Stellmodus zu gelangen und auch wieder, um den zu verlassen (If Ta_mode = 0 Then Exit Do)? Dann wäre die Taste immer noch gedrückt, wenn das Programm nach dem Return zum Befehl hinter Gosub ... zurückkehrt. Nach der Ausgabe aufs LCD springt er dann sofort wieder in die Set_alarm Routine. Dass müsstest du dir dann noch einmal ansehen.