Imports System
Public Class Program
Public Shared Sub Main(ByVal args As String())
Dim str As String = "C# C++ PYTHON C JAVA PHP"
Dim substring As String = "python"
If str.IndexOf(substring, 0, StringComparison.CurrentCultureIgnoreCase) > -1 Then
Console.WriteLine("Match")
Else
Console.WriteLine("Not match")
End If
End Sub
End Class
' run:
'
' Match
'