VB初心者質問スレPart2

457
です。助けてください。

Open FileName For Input As #2
Do While Not EOF(1)
Input #2, S
Loop
Close #2

こういうことをしても正しく動作していないみたいなのです。