die Edelvariante mit Formatierung
Code:
Dim Convert_s As String * 10
 Convert_s = Str(Tast_lo(stimme))
 Convert_s = Format(convert_s , "000")
 Locate 2 , 1 
 Lcd "Tast.Hi : " ; Lcd Convert_s
oder schnöde und ressourcenschonend:
Code:
Locate 1 , 1 
Lcd "Tast.Lo : " ; Tast_lo(stimme) ; "   " 
Locate 2 , 1 
Lcd "Tast.Hi : " ; Tast_hi(stimme) ; "   "