Funzione InStrRev [VBA]

Restituisce la posizione di una stringa all'interno di un'altra stringa, iniziando dalla parte destra della stringa.

Questa costante, funzione od oggetto viene abilitata con l'istruzione Option VBASupport 1 posizionata prima del codice eseguibile del programma all'interno del modulo.

La funzione InStrRev restituisce la posizione in cui è stata trovata la stringa, partendo dalla destra. Se la stringa non viene trovata, la funzione restituisce 0.

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

Long

StringCheck: stringa da ricercare.

StringMatch: stringa da ricercare.

Start: espressione numerica opzionale che indica la posizione partendo dalla sinistra nella stringa da cui ha inizio la ricerca della sottostringa specificata. Se omettete questo parametro, la ricerca parte dall'ultimo carattere della stringa. Il valore massimo consentito è 65535.

Compare: espressione numerica opzionale che definisce il tipo di confronto. Il valore di questo parametro può essere

1: valore predefinito che specifica un testo di confronto che non tiene conto delle maiuscole e minuscole.

0: valore che specifica un confronto binario che tiene conto delle maiuscole e minuscole.

Per evitare un errore runtime, non impostare il parametro Confronto se è stato omesso il primo parametro di ritorno.

Sub ExamplePosition
Dim sInput As String
Dim iPos As Integer
 sInput = "The book is on the table"
 iPos = InStrRev(sInput,"the",10,1) ' Restituisce 1, la ricerca non considera le maiuscole e le minuscole
 Print iPos 
 iPos = InStrRev(sInput,"the",10,0) ' Restituisce 0, la ricerca considera le maiuscole e le minuscole
 Print iPos
End Sub