Hallo Horst,
der Ausdruck "STR$(tag%)="0"+STR$(tag%)" ist unsinnig und macht exakt nichts. (Ok, besser wäre eine Meldung "Syntaxfehler!"). STR$() ist eine Funktion. Eine Funktion liefert ein Ergebnis, aber man kann ihr kein anderes Ergebnis zuweisen. Du musst hier schon eine Stringvariable bemühen:
Code
DECLARE Y%, TEXT$
CLS
VAR tag%=1
VAR tag&=CREATE("CHOICEBOX",%hwnd,0,10,10,45,250)
WHILELOOP tag%,31
TEXT$=STR$(tag%)
Y%=LEN(TEXT$)
CASE Y% = 1:TEXT$="0"+TEXT$
ADDSTRING(tag&,TEXT$)
INC tag%
ENDWHILE
'----------------------------------------
VAR monat%=1
VAR monat&=CREATE("CHOICEBOX",%hwnd,0,55,10,40,250)
WHILELOOP monat%,12
TEXT$=STR$(monat%)
Y%=LEN(TEXT$)
CASE Y% = 1:TEXT$="0"+TEXT$
ADDSTRING(monat&,TEXT$)
INC monat%
ENDWHILE
'--------------------------------------------
WHILE 1
WAITINPUT
CASE ISKEY(27):END
ENDWHILE
Alles anzeigen
Gruß
Roland