Open "d:\12.txt" For Input As #1 ‘读取
s = Input(LOF(1), 1)
Close #1
s=replace(s,"a=110117","a=227504") '替换
Open "d:\12.txt" For Ouput As #1 '写入
print #1,s
Close #1
楼主五级用户，1335个金币，太抠门了。
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024