189 8069 5689
用替换函数直接把03-24^32替换为03-24^xx(想替换的值)。
创新互联从2013年创立，先为武宁等服务建站，武宁等地企业，进行企业商务咨询服务。为武宁企业网站制作PC+手机+微官网三网同步一站式服务解决您的所有建站问题。
比如，你的文本放在TextBox1文本框的话，用下面的指令替换就可以了。
Dim txt As String = TextBox1.Text
TextBox1.Text = Replace(txt, "03-24^32", "03-24^xx")
执行上面替换指令后，TextBox1的文本替换为：
【例如：03-23^23
03-24^xx
我要指定修改第二行的32.该怎么办？】
为什么非要存成TXT文件呢？最好的办法是将你的这些数据存放在DataSet对象里，然后用DataSet对象的WriteXML方法写入文件。下次读取时，使用该对象的ReadXML方法就可以取回存在文件中的数据了。你想增、删、编辑都可以，很方便的！如果非要生成TXT文件，可以在DataSet对象顺序读取数据，然后再生成想要的TXT文件。你也用不着去追究IO流的操作了。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim txt As String = My.Computer.FileSystem.ReadAllText("c:\新建 文本文档.txt", System.Text.Encoding.Default) '先读取文本中所有内容
My.Computer.FileSystem.WriteAllText("c:\新建 文本文档.txt", "", False, System.Text.Encoding.Default) '清空原文本内容
Dim AllLine() = Split(txt, vbCrLf) '按回车符号切割成数组
For i As Integer = 0 To UBound(AllLine) '循环数组
' AllLine(i) = Replace(AllLine(i), "000", "111") '如果所有行都是统一转换则本条生效
If i = 5 Then '只转换第六行 起始是0，所以5实际为第6行
AllLine(i) = Replace(AllLine(i), "000", "111")
End If
My.Computer.FileSystem.WriteAllText("c:\新建 文本文档.txt", AllLine(i) vbCrLf, True, System.Text.Encoding.Default) '按行重新写入
Next
End Sub
批量替换word文档中的内容的方法：启动Word文档软件。按Ctrl+O打开需要修改的文件。打开需要修改的文件后，在word菜单栏点击“替换”按钮。在弹出的替换对话框中：首选查找到需要替换的内容，再输入替换为的内容。然后点击“全部替换”即可，如图所示：
1.使用app.config文件
2.使用xml
3.使用ini
4.使用数据库等都可以
我想你可以这样考虑...
插入\删除\修改都可以基于读,写实现
比较简单的是删除操作(我理解你想要清空内容),直接写入空字符即可
接下来是修改
首先你需要修改的文件以文本形式读到界面(Web)的文本框或者DIV(加入属性 contenteditable="true" )中
修改完成后,再将内容提交保存到刚才打开的文本文件即可
实现了修改,普通插入不再是难事.