Найти положение слова в строке

Question

я должен осуществить поиск в следующем методе

Пусть:

Dim checkin As String = "This is the base string, i have to find a word here" 
Dim valueSearch As String="to find a word" 

Теперь алгоритм будет реализован в:

• Dim ул() As String = Split (checkin, "")
• Dim Position As Integer
• Position = Найти Положение str(0) в строке
• Проверить str(1) со следующим словом после position го слова в checkin
• , если не равно продолжить второй этап с str(1)
• if Dim valueSearch As String="to find a game" then я должен отобразить сообщение о том "to find a" является настоящее

Мой вопрос заключается в том, что это возможно, чтобы найти положение слова в строке, используя

string.Contains() работа. или любую другую возможность реализовать этот алгоритм?

Answer 1

Попробуйте Как это

Создать рекурсивный метод. Используйте String.Contains. Его истинный, а затем возврат еще продолжит метод.

private Sub Recursive(ByVal xStr As String, ByVal xSearch As String) 

      If xStr.Contains(xSearch) Then 
       MsgBox(xSearch) 
      ElseIf xSearch.Contains(" ") Then 
       Recursive(xStr, xSearch.Substring(0, xSearch.LastIndexOf(" "))) 
      Else 
       MsgBox("Not Founded") 
      End If 

     End Sub 

Call Recursive("This is the base string, i have to find a word here", 
"to find a game") 

Answer 2

String.Contains(), INSTR или IndexOf все должны делать то, что вы хотите

http://msdn.microsoft.com/en-us/library/dy85x1sa(v=vs.110).aspx

http://msdn.microsoft.com/en-us/library/8460tsh1(v=vs.90).aspx

http://msdn.microsoft.com/en-us/library/2y7ddk24.aspx