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

用VB搜索D:\vb.txt中带”rightSpace”的字符串,并将这行文字改为”rightSpace=-242”,怎么做,谢谢谢谢VB妮可,我把它拿修改INI文件,老... 用VB搜索D:\vb.txt中带”rightSpace”的字符串,并将这行文字改为”rightSpace=-242”,怎么做,谢谢
谢谢VB妮可,我把它拿修改INI文件,老是错误,怎么办?
运行后这句错误
Print #1, b '写入文件
变成黄色的
展开
 我来答
VB妮可
2007-12-08 · TA获得超过3333个赞
知道大有可为答主
回答量:2574
采纳率:0%
帮助的人:0
展开全部
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 ' 打开文件。
cauliflower06
2007-12-08 · 超过18用户采纳过TA的回答
知道答主
回答量:83
采纳率:0%
帮助的人:0
展开全部
确定没有其他软件占用那个文件吗
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式