VB中如何删除某文件中的特定字符

Question

在VB中如何将某文件中
所有带有 game字符的行整行删除掉？能以d:\123.txt
来举个例子么？如果会批处理的,希望也能给出批处理代码.

Answer 1

dim strLine as string
open "d:\123.txt" for input as #1
open "d:\_123.txt" for output as #2
do while not eof(1)
    line input #1,strLine
    if instr(Lcase(strLine),"game")=0 then
        print #2,strLine
    end if
loop
close #1
close #2