In diesem Beispiel wird die InStr-Funktion verwendet, um die Position des ersten Auftretens einer Zeichenfolge innerhalb einer anderen Zeichenfolge zurückzugeben.
Dim SuchText, SuchZeichen, Pos1 Suchtext ="XXpXXpXXPXXP" ' Zu durchsuchende ' Zeichenfolge. SuchZeichen = "P" ' Nach "P" suchen. ' Reiner Textvergleich ab Position 4. Das Ergebnis ist 6. Pos1 = Instr(4, Suchtext, SuchZeichen, 1) ' Binärer Vergleich ab Position 1. Das Ergebnis ist 9. Pos1 = Instr(1, Suchtext, SuchZeichen, 0) ' Standardmäßig wird der Vergleich binär durchgeführt ' (wenn das letzte Argument nicht angegeben wird). Pos1 = Instr(Suchtext, SuchZeichen) ' Liefert 9. Pos1 = Instr(1, Suchtext, "W") ' Liefert 0.