(VFP) - Search Char in Word

vword = 'MICROSOFT#VISUAL#FOXPRO#SEDNA_SP2'

v1 = GETWORDNUM(vword,1,'#')
v2 = GETWORDNUM(vword,2,'#')
v3 = GETWORDNUM(vword,3,'#')
v4 = GETWORDNUM(vword,4,'#')