Imports SystemImports System.DataImports System.Collectionspublic class MainClass Shared Sub Main() Dim A As String = "ABCD" Console.WriteLine(InStr(A, "C")) End SubEnd Class