Question

vb这段编程为什么显示输入超出文件尾

Dim a(1 To 9) As String
Private Sub Command1_Click()
Open "f:\a.txt" For Input As #1
For i = 1 To 9
Input #1, a(i)
Text1.Text = Text1.Text & a(i) & " "
Next i
End Sub

Answer 1

因为a(1)已经把整个文件读完，文件指针指到文件末尾，这样a(2)就从文件尾开始读取，系统不允许，就失败了。
可以使用Line Input#代替；或者使用Input$代替。

Answer 2

文件内容长度小于9个字节。