Question

VB6.0中，将导入的txt文档替换两个字符串后再输出。有谁知道怎么写代码啊？求高人指点！

将E:/12.txt文档导入，然后将其中的“321”字符串替换为窗口中新输入的数值L（例：“333”），再将“546”替换为窗口中新输入的数值M，然后以E :/123.txt形式输出。求高人指点迷津！
12.txt文档内容如下：
ABC 123
ABC 456
ABC 321
ABC 780
ABC 546

Answer 1

private sub command1_click()
L=text1.text
M=text2.text
open "e:\12.txt" for input as #1
while not eof(1)
line input #1,t
s=s & t & vbnewline
wend
close #1
s=replace(s,"321",L)
s=replace(s,"546",M)
open "e:\12.txt" for output as #1
print #1,s
close #1
end sub

Answer 2

你的12.txt文档的格式是什么样的？比如说每行包含哪些值，以什么符号分隔，或者说是一个不分行的文本块？

追问

12.txt文档内容如下：
ABC 123
ABC 456
ABC 321
ABC 780
ABC 546