reading from a text file

[Criki]

Let's say your string is "59 137 2 18"
Try this...
dim sString as String
dim sNumber1 as String
dim sNumber2 as String

sString = "59 137 2 18"
sNumber1 = left$(sString, instr(sString," "))
sString = right$(sString,len(sString)-len(sNumber1)+1)
sNumber2 = Left$(sString,instr(sString," "))
etc, etc