BCX Console Demonstration Program s15.bas

 DIM a$
 
 a$ = "this is a test"
 
 a$ = LEFT$(a$, 4)
 
 ? a$