我想读取.TXT文件中的文字，用 line input主要思路就是把遇到一个回车符前的文字放入变量a中，然后再把a放入数组b()中，程序如下，帮忙看下有什么问题

Dim a As String
dim b(100) as string ' 根據需要定義數組

Private Sub Form_Load()
Dim i As Integer
Open "G:\00.txt" For Input As #1
Do While Not EOF(1)
Line Input #1, a
strcopy(b(i),a) /*這句換成 b(i)=a 我沒查到這個函數 strcopy 樓主是不是受C語言影響*/
i = i + 1
Loop
close #1 ' 打開文件要關閉
End Sub