Como ler linhas de um arquivo de texto, uma a uma, com o código Power Point VBA?

Este código irá ler uma linha de um arquivo de texto:

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

Como posso fazê-lo ler repetidamente uma linha após a outra do mesmo arquivo? Eu acho, eu deveria usar um loop aqui, certo? Preciso ler a primeira linha do arquivo na primeira iteração, a segunda linha na segunda iteração, a terceira na terceira e assim por diante até que todas as linhas tenham sido lidas. Como eu posso fazer isso?

Adição importante: eu preciso do código para operar em cada linha, uma por uma - não todas de uma vez!

questionAnswers(4)

yourAnswerToTheQuestion