VB求助指点。万分感谢！

1.TXT DIR(C:\1.TXT)

Text1.text 输入后按回车直接替换 PN123458

Text2.text 输入后按回车直接替换 PN123459      跪求高手附源码！！！万分感谢 ！！

---

replace()

---

看不到图，不知道要更换什么

---

是把：
PN123458　替换成 SN:1234567
PN123459　替换成 SN:1234568
吗？


文本文件中 PN123458 、PN123459 分别只有一行，还是不确定的多行？

在 Text1 和 Text2 中输入替换内容后，按一个按钮，一次性把所有要替换的都替换完不好吗？

---

是不确定的多行 也可以按你的思路编辑 求赐教 ！

---

你问题不讲清楚，神仙都难办。
5楼的问题有7-8行，你求解的只一行。

---

其实需要确定的是你现在存在逐行读取有问题，还是字符串判断有问题，还是回写的问题。

---

1、使用Input语句读入TXT文件到StrP
2、使用Replace函数替换相关内容

---

txt 打开方式为append
print语句逐行回写

还有，txt编码格式是ANSI还是Unicode的，读取方式不一样。

---

再次感谢各位热心人士 ， 我这里列出来的只有两个 Text1.Text 和 Text2.Text输入值  文本内容也只显示两个替换值  如果能实现  即使有10几个 100个 相信应该也能做到

---

我的代码不是能实现无限次的替换么？

PN123458　替换成 TextBox1 中输入的内容
PN123459　替换成 TextBox2 中输入的内容


处理后的新文件内容输出到另一个文件中，这个文件你可以按你的需要指定。

---

chen8013的方法可行 谢谢 再次感谢

---

来晚了