A.
Open 'c:/File1.txt' For Input As #1 Do While Not EOF() Line Input #1, strLine Loop
B.
Open 'c:/File1.txt' For Input As#1 Do While Not EOF(#1) Line Input #1, strLine Loop
C.
FileNo=FreeFile Open FileNo For Input As #1 Do While Not EOF(FileNo) Line Input #1, strLine Loop
D.
FileNo=FreeFile Open FileNo For Input As #1 DoWhile Not EOF(#FileNo) Line Input #1, strLine Loop