Public Class clsIndexOf
 
    Public Sub Main()
 
 
        '****************************************************************************************
        ' Purpose:  Returns an integer that represents the position of the first occurrence of the
        ' specified number of characters. If you specify startIndex, that specifies
        ' where to start looking. If you specify count, that specifies how many characters to 
        ' to search past start. If the string is not found, this method returns -1
        '
        ' Syntax: 	string.IndexOf(matchstring[, startIndex][,count])
        '
        ' Parameter1: string - Required - string to be searched
        '
        ' Parameter2: matchstring - Required - string that you are looking 
        ' for in parameter1
        '
        ' Parameter3: startIndex - Optional. specifies where to start looking. Zero-based.
        '
        ' Parameter4: count - Optional. specifies how many characters to 
        ' to search past start.
        '
        ' Result: integer - Returns an integer that represents the position of the first 
        ' occurrence of the specified number of characters. If the string is not found, 
        ' this method returns -1.  The integer returned is a zero-based index so the first
        ' position is represented by 0 instead of 1.
        '
        ' Quick Example:    Dim strIndexOfExample As String = "This is a test string"
        ' Console.WriteLine(strIndexOfExample.IndexOf("is")) 'Returns 2
        ' Console.WriteLine(strIndexOfExample.IndexOf("xyz")) 'Returns -1 (not found)
        '
        ' 
        '****************************************************************************************
 
 
        Console.WriteLine("Example #1: string.IndexOf(matchstring[, startIndex][,count]) ")
 
        Dim strIndexOfExample As String = "This is a test string"
 
        Console.WriteLine(strIndexOfExample.IndexOf("is")) 'Returns 2
 
        Console.WriteLine(strIndexOfExample.IndexOf("xyz")) 'Returns -1 (not found)
 
        Console.WriteLine(strIndexOfExample.IndexOf("T"), 0) 'Returns 0 
 
        'write blank line to make output easier to read
        Console.WriteLine()
 
        'Prevent console from closing before you press enter
        Console.ReadLine()
 
    End Sub
 
 
End Class

Module Module1
 
    Sub Main()
 
 
        Dim myclsIndexOf As New clsIndexOf
        myclsIndexOf.Main()
 
 
 
    End Sub
 
End Module