Question

VB2010 小白求知道如何向TXT文件的制定位置写入内容。

例如：在“D：飞机猫.txt”这个文件里
12/34/563/245/96/
34/25/788/4356/4345/
4356/65/8789/453
1、求知道如何在第二行最后插入内容“456”
2、如何将第三行第二个65改成“675”
求详细代码。小白实在太弱了。跪求各位大大指导啊。

Answer 1

首先你的路径就错了，应该是

  “D:\飞机猫.txt”

Dim str As String =IO.File.ReadAllText("D:\飞机猫.txt")
str=str.Replace("4345/","4345/456")
str=str.Replace("65","675")
IO.File.WriteAllText("D:\飞机猫.txt",str)

代码修改这段文字很简单，但问题是你为什么要这么改，要不然写出的代码没针对性。

追问

谢谢大神，我手贱打错路径，抱歉哦~我想给txt里面的一些数据做修改。您帮到我了~谢谢。 不过如果是第一个问题，在后面添加“456”可以不用replace么？appendtext这个不知道可不可以…如果可以，能告诉我肿么用不？谢谢哦~~

追答

appendtext是增加文本，不会改动原来的文本。那三行还是会保持原样。

        Dim str As String() = IO.File.ReadAllLines("D:\飞机猫.txt")
        str(1) = str(1) + "456"
        str(2) = str(2).Replace("65", "675")
        IO.File.WriteAllLines("D:\飞机猫.txt", str)