Spis treści

# Funkcja InStrRev [VBA]

Zwraca pozycję ciągu w innym ciągu, zaczynając od prawej strony łańcucha.

Ta stała, funkcja lub obiekt włączane są przez instrukcję Option VBASupport 1 umieszczoną w module przed programem wykonywalnym.

Funkcja InStrRev zwraca pozycję, w której znaleziono dopasowanie, z prawej strony. Jeśli łańcuch nie został znaleziony, funkcja zwraca 0.

### Składnia:

    InStrRev (StringCheck As String, StringMatch As String [,Start As Long] [, Compare As Integer])

### Typ zwracany:

Long

### Parametry:

StringCheck: Wyrażenie w postaci ciągu, które chcesz wyszukać.

StringMatch: Wyrażenie w postaci ciągu, które chcesz wyszukać.

Start: Opcjonalne wyrażenie numeryczne, które zaznacza pozycję od lewej w ciągu, w którym rozpoczyna się wyszukiwanie podanego podciągu. Jeśli pominiesz ten parametr, wyszukiwanie rozpocznie się od ostatniego znaku ciągu. Maksymalna dozwolona wartość to 65535.

Porównaj: Opcjonalne wyrażenie numeryczne, które definiuje typ porównania. Wartością tego parametru może być

1: Domyślna wartość 1 określa porównanie tekstu, w którym nie jest rozróżniana wielkość liter.

0: Wartość 0 określa porównanie binarne, w którym rozróżniana jest wielkość liter.

Aby uniknąć błędu w czasie wykonywania, nie ustawiaj parametru Compare, jeśli pominięto pierwszy zwracany parametr.

### Kody błędów:

5 Nieprawidłowe wywołanie procedury

### Przykład:

    Sub ExamplePosition
    Dim sInput As String
    Dim iPos As Integer
     sInput = "The book is on the table"
     iPos = InStrRev(sInput,"the",10,1) ' Zwraca 1, wyszukiwanie nie uwzględnia wielkości liter
     Print iPos
     iPos = InStrRev(sInput,"the",10,0) ' Zwraca 0, wyszukiwanie uwzględnia wielkość liter
     Print iPos
    End Sub

Tematy pokrewne

InStr

Prosimy o wsparcie!