如 何 在 文 本 文 件 中 查 找 指 定 字 符 并 将 其 替 换 成 别 的 字 符 ？

[Snymph]

各 位 高 人 ：
我 叫 强 力 胶 ， 是 个 菜 鸟 ！ 这 几 天 遇 上 了 点 困 难 ， 十 分 着 急 ！ 不 知 那 位 能
救 我 ！
我 在 用 vb编 一 个 小 程 序 。 其 中 有 一 点 ： 就 是 如 何 在 文 本 文 件 中 查 找 指 定
的 字 符 并 将 其 替 换 成 别 的 字 符 ？ 我 知 道 这 难 不 到 各 位 ， 请 您 指 教 ！ 万 分 感 谢 ！
(我十分着急 ，谢谢各位 ，千万别不理我 ）

强 力 胶
mujnet.yeah.net

[mxp]

'替换回车和换行
Dim tempv As String
v(3)为利用文本读出的字符串

tempv = ""
For i = 1 To Len(v(3))
If Mid(v(3), i, 1) = vbCr Then 'ascii 13
tempv = tempv & "<Br>"
Else
If Mid(v(3), i, 1) <> vbLf Then
tempv = tempv & Mid(v(3), i, 1)
End If
End If
Next
v(3) = tempv
'我再给你发一个程序吧！是利用文本自动生成Webclass程序的， 其中有许多关于文件的操作，是我自己做的。注意接收！名称：mxp.zip

[mxp]

赶紧把那个72分的删除了，值不了那么多分，太浪费了！

[mxp]

要是修改本文件，并且也必须存成本文件（覆盖），先将它读入内存再修改写入就可以了。