UC知道如何修改txt文件的某一行数据？附带已经写好的读取代码
来源：百度知道 编辑：UC知道 时间：2024/07/07 13:12:40
Dim strTemp As String
Dim iLine As Integer
iLine = 0
Open App.Path & "/Db.dll" For Input As #1 '
Do While Not EOF(1) And iLine < Forms.QMListBox1.ListIndex + 1 '这里是获取listbox选择的某一行
Line Input #1, strTemp
iLine = iLine + 1
Loop
Close #1
MsgBox strTemp '测试了一下 成功读取
但是就是不知道如何修改读取的这一行 也就是修改
附带： txt文件
我为你
我为我
我为他
比如 我选择了第2行 修改第2行为 我爱谁
结果：
我为你
我爱谁
我为他
就是想实现以上这样的结果，请朋友们帮写一下。
Dim iLine As Integer
iLine = 0
Open App.Path & "/Db.dll" For Input As #1 '
Do While Not EOF(1) And iLine < Forms.QMListBox1.ListIndex + 1 '这里是获取listbox选择的某一行
Line Input #1, strTemp
iLine = iLine + 1
Loop
Close #1
MsgBox strTemp '测试了一下 成功读取
但是就是不知道如何修改读取的这一行 也就是修改
附带： txt文件
我为你
我为我
我为他
比如 我选择了第2行 修改第2行为 我爱谁
结果：
我为你
我爱谁
我为他
就是想实现以上这样的结果，请朋友们帮写一下。
我的办法有两个：
一个重新写入txt。
另一个不用重新写入txt，用binary读取修改。但貌似不够方便，而且等字符替换还好说，如果不等长的字符就麻烦了。
期待更好的答案。