VB.net-使用多个字符从文本文件中拆分行

我想这样做，我的程序将搜索一个文本文件，并在找到关键字时将所有文本声明为字符串，直到它“看到”下一个关键字。就像用鼠标突出显示文本一样

到目前为止我有这个密码

    Dim objReader As New StreamReader("C:\test.txt")

    Dim file As String = ""
    Dim result As String

    If Not file Is Nothing Then
        file = objReader.ReadLine()
        result = file.Split("keyword")(1).Split("keyword2")(0)
        TextBox1.Text = Convert.ToString(result)
    End If

现在，如果我尝试使用单个字符或字母等，这很好，但是单词会导致复制文本文件中看似随机的内容

---

提前感谢您的帮助，并为我的“不必要”表示歉意。

此函数应该可以实现此功能

Function GetSubString(ByVal inText As String, ByVal firstWord As String, ByVal secondWord As String) As String
    Dim indexFirst As Integer = inText.IndexOf(firstWord)
    Dim indexSecond As Integer = inText.IndexOf(secondWord)
    Return inText.Substring(indexFirst, indexSecond - indexFirst + secondWord.Length)
End Function

像这样使用它：

GetSubString(RichTextBox1.Text, "quick", "over")

使用此文本：

敏捷的棕色狐狸跳过了懒狗

这是返回的：

敏捷的棕色狐狸跳了过去

---

您希望搜索文本，直到找到特定单词出现的索引。然后，从这里开始，您想将索引之后的所有文本添加到字符串中，直到找到另一个特定的单词为止？我做对了吗？是的，这正是我想做的。好的，很好。我会很快把一些代码拼凑起来。马上回来看看！太好了！但是如何将此搜索设置为文本文件？

My.Computer.FileSystem.ReadAllText（“C:\Test.txt”）

将读取给定文件中的所有文本。只要把它传递到函数和所需的两个单词。如果你认为我的答案是正确的，请将它标记为接受。你会发现更多的用户愿意花时间回答你未来的问题，如果他们看到你在适当的时候花时间接受答案。谢谢一件事，很抱歉给您带来不便，但在为我使用它时，它会返回一个错误，“StartIndex不能小于零”。在返回行上，我可能做错了。发布您的文本和您正在搜索的单词，我会看一看