vb中如何读取，写入txt文件

Question

比如我的某一个txt文件中的内容是：
01 02 03 04 05
07 08 09 10 11
我的要求是把上面的格式转换成下面的格式然后保存
01-02-03-04-05+16
07-08-09-10-11+16
请问如何编程来实现。谢谢大家！

Answer 1

Private Sub Form_Load()
Dim str1 As String, str2 As String
Open "c:\1.txt" For Input As #1
Do While (Not EOF(1))
Line Input #1, str1
str2 = str2 & Replace(str1, " ", "-") & "+16" & vbCrLf
Loop
Close
Open "c:\2.txt" For Input As #1
Print #1, str2
Close
End Sub本回答被提问者采纳