VB搜索并修改TXT中某些文字

来源：百度知道 编辑：UC知道 时间：2024/05/22 17:56:26
用VB搜索D:\vb.txt中带”rightSpace”的字符串，并将这行文字改为”rightSpace=-242”，怎么做，谢谢
谢谢VB妮可，我把它拿修改INI文件，老是错误，怎么办？
运行后这句错误
Print #1, b '写入文件
变成黄色的

Private Sub Command2_Click()
Dim a$, b$
Open "D:\vb.txt" For Input As #1 ' 打开文件。
Do While Not EOF(1) ' 循环至文件尾。
Line Input #1, a ' 读入一行数据并将其赋予某变量。
b = b & Replace(a, "rightSpace", "rightSpace=-242") & vbCrLf ' 替换并放入变量
Loop
Close #1 ' 关闭文件。

Open "D:\vb.txt" For Output As #1 ' 打开文件。
Print #1, b '写入文件
Close #1 ' 关闭文件。
End Sub

补充:不会错的.注意文件名别错了就行..
再补充: sorry, 打错了.呵呵,才看到..
Open "D:\vb.txt" For output As #1 ' 打开文件。

确定没有其他软件占用那个文件吗