BCX Console Demonstration Program s93.bas |
' ********************************************** ' BCX sample console program by Kevin Diggins ' Demonstrates the built-in REMOVE$ function ' ********************************************** DIM Q$ Q$ = "abc123abcabcabc456abcabcabc789abcabcabc" PRINT "Unfiltered: ", Q$ REMOVE "abc" FROM Q$ ' Also legal in BCX-> Q$ = REMOVE$(Q$, "abc") PRINT " filtered: ", Q$
Unfiltered: abc123abcabcabc456abcabcabc789abcabcabc filtered: 123456789