BCX Console Demonstration Program S14.bas

 DIM a$
 DIM b
 
 a$ = "123456789"
 
 b = INSTR(a$, "789")
 
 ? b