Android Code Snippet Find if there is a word in a text

Subname: FindWorldInText

Description: Find if there is a word in a text. Returns True or False.

Dependencies/Libraries: None.

Sub FindWordInText (word As String, txt As String) As Boolean
    Dim matcher1 As Matcher

    matcher1 = Regex.Matcher(word, txt)
    If matcher1.find = True Then
        Return True
    Else
        Return False
    End If
End Sub

Example:

Log(FindWordInText("is", "This is a message"))    'Return True
Log(FindWordInText("im", "This is a message"))    'Return False

 

[Erel]

If you are searching for a string and not a regular expression pattern then you can use:

Sub FindWordInText (word As String, txt As String) As Boolean
Return txt.Contains(word)
End Sub

 

[LucaMs]

Better yet, txt.IndexOf, so you know immediately where the word begins.