Question

如何用VB在txt文件固定列写入相同文本内容，

例如
1 3
1 3
1 3
这样一个内容格式的txt文本，现在我想在第二列写入一个相同的2，将txt文本的内容变为
1 2 3
1 2 3
1 2 3
这里我只是打一个比方，谢谢大家。求程序、、可加扣扣详解，谢谢：838689121

Answer 1

Private Sub Command1_Click()
Open "e:\temp\1.txt" For Input As #1
Open "e:\temp\temp.txt" For Output As #2
Do Until EOF(1)
Line Input #1, a
b = Len(a)

Print #2, Left(a, b \ 2) & "2" & Right(a, b \ 2)

Loop
Close (1)
Close (2)
End Sub

Answer 2

银铃轻响，是思念和祝福的投递。轻轻地一声问候，不想惊扰你，只想真切地祝你新春快乐！

Answer 3

有句话，很珍惜的话，要对你说，因为一年或许才能说一次，我想现在是该大声说出来的时候了，我要大叫……春节快乐：）

Answer 4

银铃轻响，是思念和祝福的投递。轻轻地一声问候，不想惊扰你，只想真切地祝你新春快乐！

Answer 5

新年祝福你：好运伴着你，财神跟着你，名车美女属于你，霉运躲着你，喜事围绕你！ 加分吧，嘻嘻

Answer 6

新春到，祝君：百事可乐！万事芬达！天天哇哈哈！月月乐百事！年年高乐高！心情似雪碧！永远都醒目！ 加分吧，嘻嘻