Const CaseAndPitch = 0

Const PitchNoCase = 1

Const CaseNoPitch = 4

Const NoCaseNoPitch = 5

' The value 5 (the position of the character where the first

' occurrence of LittleString begins in BigString) is assigned

' to the variable positionOfChar.

Dim BigString As String, LittleString As String

Dim positionOfChar As Long

BigString$ = "abcdefghi"

LittleString$ = "efg"

positionOfChar& = InStr(BigString$, LittleString$)

Print positionOfChar& ' Output:  5

positionOfChar& = InStr(1, BigString$, LittleString$)

Print positionOfChar& ' Output:  5

positionOfChar& = InStr(1, BigString$, LittleString$, NoCaseNoPitch)

Print positionOfChar& ' Output:  5

See Also

InStr function

Glossary