vb 一行一行读取文本

来源：百度知道 编辑：UC知道 时间：2024/06/16 10:27:10
各位老大好
请问怎样在VB中读取一个文本
然后将第一行显示在Text1中
第二行显示在Text2中
第三行显示在Text3中
如此循环...

Private Sub Command1_Click()
Open "z:\1.txt" For Input As #1
Do While Not EOF(1)
Line Input #1, temp
Text1(i) = temp
i = i + 1
Loop
Close #1
End Sub

text1为控件数组~

先打开文件，然后判断文本文件是否结束，把内容放到动态数组里。再赋值。再关闭文本文件，好久没玩了。具体代码忘了。