新手求助:如何用vb修改txt文件

[TLX4915]

如何用vb修改txt文件
那位大哥帮我一把,我需要用vb修改指定txt文件中的固定位置的数据.比如我要不把

"12 35 3243 32434 34 4343343 787
45454 656 5 7676 878 98989 4534"

中第二行中的878改为 999,

该用什么方法,谢谢了

[iamtsfw]

请把下面代码放入一个按钮下试验一下

'把文本文件装入一个数组，每行为一个数组元素
Open App.Path & "\test.txt" For Input As #1
Dim strArray() As String
Dim i As Long
i = 0
Dim strLine As String
Do While Not EOF(1) ' 循环至文件尾。
Input #1, strLine
ReDim Preserve strArray(i)
strArray(i) = strLine
i = i + 1
Loop
Close #1

'替换第二行的878
strArray(1) = Replace(strArray(1), "878", "999")

'重写回test.txt文件
Open App.Path & "\test.txt" For Output As #1
Dim j As Long
For j = 0 To i - 1
Print #1, strArray(j)
Next
Close #1

[iamtsfw]

补充：
我把
12 35 3243 32434 34 4343343 787
45454 656 5 7676 878 98989 4534
放入项目目录下的test.txt文件了