Здравствуйте, Osco, Вы писали:

O>Дан файл с несколькими числами. Как их оттуда последовательно прочитать?

dim s as string
dim o as new system.io.streamreader("filename.txt")
s = o.readtoend()
o.close
o = nothing