Untuk mengetahui posisi sebuah karakter pada sebuah string, menggunakan Visual Basic 6, kita dapat menggunakan syntax:

Public Shared Function InStr(_
   ByVal String1 As String, _
   ByVal String2 As String, _
   Optional ByVal Compare As CompareMethod _
) As Integer
' -or-
Public Shared Function InStr(_
   ByVal Start As Integer, _
   ByVal String1 As String, _
   ByVal String2 As String, _
   Optional ByVal Compare As Microsoft.VisualBasic.CompareMethod _
) As Integer

Parameter:

– Start= nilai posisi awal pencarian, jika tidak diberikan maka akan dimulai dari awal string. optional

– String1= String dimana karakter yang akan dicari. harus ada.

– String2= String/karakter yang akan dicari. harus ada.

– Compare= metode yang digunakan. Binary atau Text.

Contoh:

'String tujuan pencarian.
Dim SearchString As String = "XXpXXpXXPXXP"
'karakter yang akan dicari "p".
Dim SearchChar As String = "P"

Dim TestPos As Integer
' Pencarian dengan metode Text, dimulai dari posisi 4. akan didapatkan 6
TestPos = InStr(4, SearchString, SearchChar, CompareMethod.Text)

' Pencarian dengan metode binary, dimulai dari posisi 1. didapatkan 9.
TestPos = InStr(1, SearchString, SearchChar, CompareMethod.Binary)

' Jika opsi pencarian tidak ditentukan, akan didapatkan 9.
' Jika metode pencarian ditentukan Text, akan didapatkan 3
TestPos = InStr(SearchString, SearchChar)' Didapatkan 0
TestPos = InStr(1, SearchString, "W")

Demikian, semoga bermanfaat.

Sumber: http://msdn.microsoft.com/en-us/library/8460tsh1%28v=vs.80%29.aspx