I'm trying to build an user interface based on keywords from a text file. My search can now determine the index of each key word I apply. What I'd like to be able to do is then pull those indexes in numerical order from the textbox I saved them to.
I.E.
index value = 0
Do until "endoftextbox"
'search textbox for next index value
'Do something with this
Loop
Here is what I have so far,
Sub ShallReadRoutine()
Dim keywords() = {"shall read", "Power", "J-IC", "Factory Default"}
Dim i As Integer
For Each key As String In keywords
i = Procedure.IndexOf(key)
Do Until i = Procedure.LastIndexOf(key)
RichTextBox1.AppendText(i)
RichTextBox1.AppendText(" " + key)
RichTextBox1.AppendText(Environment.NewLine)
i = Procedure.IndexOf(key, i + 1)
Loop
Next key
End Sub
Can someone help?