VBS 循环替换多个文本中的字符

请问如何使用VBS 实现替换多个文本文件中的某一字符？
使用循环语句吗？
请各位VB 高手给予解答，谢谢！
谢谢二位的回答，二楼的朋友，我有多个文本文件，您的方法只能替换一个呀 ！

支持拖放功能 你只要把整个文件夹拖放到这个vbs文件上就可以了 他会自动识别txt格式的文件并修改

For Each a In WScript.Arguments
w=w&a
Next

set ws=createobject("wscript.shell")
set fso=createobject("scripting.filesystemobject")
set folder=fso.getfolder(w)
set files=folder.files
for each file in files
d=File.name
s = Instr(1, d, "txt")
if s <>0 then
scan(file)
end if
next

function scan(file)
set fso=createobject("scripting.filesystemobject")
set fil=fso.opentextfile(file)
s=fil.readall
fil.close
set fi=fso.opentextfile(file,2)
s=Replace(s,"你要替换的字符","你要替换成的字符")
fi.write s
fi.close
end function

温馨提示：内容为网友见解，仅供参考

当前网址：https://22.t2y.org/zz/2xc60itx.html