Example - InStr Function
Sub Main () myStr = "Good Bye and Bye Again" myLoc1 = InStr(1, myStr, "Bye") 'returns the position of the first occurrence myLoc2 = Instr(10, myStr, "Bye") 'returns the position of the second occurrence MsgBox "Found string at location " & myLoc1 & ".", 64, "String Found" MsgBox "Found string at location " & myLoc2 & ".", 64, "String Found" End Sub