Voorbeelden over functie Word$()

Hieronder zijn twee voorbeelden hoe we met WORD$() gegevens uit een string kunnen filteren.
Wijzig de 0 bij een IF statement in een 1 als je dat deel wilt testen.
'word$ functie
'word$(stringvar$, index, token$)
if 0 then
   stringVar$ = "Appel, Banaan, Kers, Sinaasappel"
   print trim$(word$(stringVar$, 3, ","))
   index = 1
   woord$ = " "
   do while woord$ <> ""
       woord$ = trim$(word$(stringVar$, index, ","))
       print woord$
       index = index + 1
   loop
end if
if 0 then
   cellen$ = "1,2;2,2;3,2;4,2;1,3;2,3;3,3;4,3"
   print word$(cellen$, 3, ";")
   cel$ = word$(cellen$, 5, ";")
   print cel$
   print word$(cel$, 1, ","); ", "; word$(cel$, 2, ",")
   cel = 1
   cel$ = " "
   do while cel$ <> ""
       cel$ = word$(cellen$, cel, ";")
       if cel$ <> "" then
           kolom = val(word$(cel$, 1, ","))
           rij = val(word$(cel$, 2, ","))
           print kolom, ",", rij
       end if
       cel = cel + 1
   loop
end if