Question

标题解释了所有内容，我找到了阅读文本文件并搜索字符串的方法，但我没有找到如何将包含该字符串的整行复制到新文本文件中。

Dim Findstring = IO.File.ReadAllText("My file path")
Dim Lookfor as string = "word"

If FindString.Contains(Lookfor) then....

End If

这是代码。这太简单了，所以当它找到一行中的单词时。我希望它将包含该单词的整行复制到一个新的文本文件中，实际上我读到这段代码将文本文件中的所有文本加载到内存中的一行并搜索其中的单词所以我认为它会不按我想要的方式工作。

Answer 1

我的建议从MSDN上发布的内容开始，这是所有新手的一个很好的起点，在这种情况下寻找Streamreader.ReadLine

Dim aLine As String
Dim strReader As New StreamReader(textReaderText)
Dim Lookfor as string = "word"
While not strReader.EndofStream
    aLine = strReader.ReadLine()
         If aLine.Contains(Lookfor) then....
             'your stuff here
         End IF
End While

代码的作用是一次一行地从流中读取，如果包含你的匹配，那么它会做什么

将包含特定字符串的文本文件中的每一行复制到新文本文件的程序

1 个答案: