RInStr

La funzione RInStr restituisce la posizione del primo carattere dell'ultima parola trovata fra due o più eventuali, identiche a quella cercata, all'interno della stringa.

pos = RInstr(stringa, sottostringa_da_cercare [, inizio, comparazione])

Se inizio, che è un integer, è specificato, la ricerca della parola/sottostringa da cercare comincia dalla posizione inizio.
La comparazione può essere o gb.Binary per una comparazione di tipo binario (predefinita); oppure gb.Case per una comparazione insensibile alle maiscole-minuscole.

Se la sottostringa da cercare non viene trovata, allora RInStr restituisce uno zero.

Esempio:

Public Sub Button1_Click()

Dim $prova As String
Dim pos As Integer

 $prova = "chiodo scaccia chiodo"

  pos = RInStr($prova, "chiodo")

  Print pos

End

In console si avrà il seguente risultato:
16

Questa funzione può essere utilizzata anche per conoscere la posizione dell'ultimo di un dato carattere all'interno di una stringa.

Esempio:

Public Sub Button1_Click()

Dim $prova As String
Dim pos As Integer

 $prova = "La pagina della WIKI"

  pos = RInStr($prova, "a")

  Print pos

End

In console si avrà il seguente risultato:
15