BASIC Programming/Beginning BASIC/Control Structures/WHILE...WEND
Appearance
INPUT"What is your name";UserName$PRINT"Hello ";UserName$DOINPUT"How many stars do you want";NumStarsStars$=""Stars$=REPEAT$("*",NumStars)'<-ANSI BASIC'Stars$ = STRING$(NumStars, "*") '<-MS BASICPRINTStars$DOINPUT"Do you want more stars";Answer$LOOPUNTILAnswer$<>""LOOPWHILEUCASE$(LEFT$(Answer$,1))="Y"PRINT"Goodbye ";FORA=1TO200PRINTUserName$;" ";NEXTAPRINT