Search Text in Vb.net

STRING SEARCH FROM ONE TEXTBOX TO ANOTHER LIKE FIND in VB.net

'   PROGRAM NAME : STRING SEARCH FROM ONE TEXTBOX TO ANOTHER LIKE FIND
'   DEVELOPED BY : SANJAY CHAUHAN
'
Public Class Form1
    Dim i As Integer

    Private Sub btnfind_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnfind.Click
        Dim myarr As String()
        myarr = Split(txtstring.Text, " ")

        For i = 0 To myarr.Length - 1
            If txtfindwrd.Text.ToLower = myarr(i).ToLower Then
                MsgBox("String found")
            End If
        Next

    End Sub
End Class