Ten kod odczyta wiersz z pliku tekstowego:

set file = CreateObject("Scripting.FileSystemObject").OpenTextFile("c:\number.txt", 1)
text = file.ReadLine
MsgBox text

Jak mogę sprawić, aby wielokrotnie czytał jeden wiersz po drugim z tego samego pliku? Myślę, że powinienem użyć pętli tutaj, prawda? Potrzebuję go do odczytania pierwszej linii z pliku przy pierwszej iteracji, drugiej linii przy drugiej iteracji, trzeciej przy trzeciej i tak dalej, aż wszystkie linie zostaną odczytane. Jak mogę to zrobić?

Ważny dodatek: Potrzebuję kodu, aby działał na każdej linii jeden po drugim - nie wszystko na raz!