如何删除文本文件当中的某一行

Question

我想删除文本文件当中的某一行,如何实现?

Answer 1

在文本文件中删除内容，实际上是重建一个没有相应内容的新文件。
Dim tmp As String
Open "c:\test\a.txt" For Input As #1
Open "c:\test\b.txt" For Output As #2
Do Until EOF(1)
   Line Input #1, tmp
   If tmp <> "被删除的行" Then Print #2, tmp
Loop
Kill "c:\test\a.txt"
Name "c:\test\b.txt" As "c:\test\a.txt"

Answer 2

有谁可以帮我详细解释一下OPEN语句里面的参数Input\Output\Append的区别吗?

Answer 3

input\output\append都是文件的读写方式，
input 读取文件 比如：open "d:\c.txt" for input as #1:input #1,i:close #1 则i="aaa"
(当然前提是c.txt的内容是aaa了）
output
 c.txt的内容为"aaa"
 open "d:\c.txt" for output as #1
   print #1,"ddd"
 close #1
则c.txt 的内容变为"ddd"
append
 c.txt的内容为“aaa"
 open "d:\c.txt" for append as #1
  print #1,"ddd"
 close #1
则c.txt的内容为
  “aaa
    ddd"

Answer 4

用input打开的必须是存在的,否则产生错误,而output\append打开的如果不存在则可以新建一个文件