BCX Console Demonstration Program S01.bas

 DIM a$
 
 a$ = "abcdefg"
 
 GOTO here
 
 a$ = "1234567890"  'this does not get executed
 
 here:
 
 a$ = RIGHT$(a$, 5)
 
 ? a$