Question

vb 修改指定行

有C:\a.txt。修改前几个字是“live1 =”这行，当然后面还有内容，修改的内容是Text1的。

Answer 1

Private Sub Command1_Click()
Open "C:\a.txt" For Input As #1
Do Until EOF(1)
Line Input #1, a
If Left(a, 6) = "live1=" Then
a = "live1=" & Text1.Text
End If
S = S & a
Loop
Close #1
Open "C:\a.txt" For Output As #1
Input #1, S
Close #1
End Sub

Answer 2

一楼可以实现～呵呵我就不重复啦！