esistenza carattere in stringa

[moribura]

Ciao,

come faccio a verificare se esiste una parola inuna stringa?

es:

dim nome="prova pippo"
verificare che esista pippo.

grazie

[Santino83_02]

Funzione InStr
Restituisce la posizione della prima occorrenza di una stringa all'interno di un'altra stringa.

InStr([inizio, ]stringa1, stringa2[, confronto])

Argomenti
inizio

Facoltativo. Espressione numerica che imposta la posizione iniziale di ciascuna ricerca. Se omesso, la ricerca inizia dalla posizione del primo carattere. Se l'argomento include un valore Null, verrà generato un errore. Se si specifica l'argomento confronto, l'argomento inizio è obbligatorio.

stringa1

Obbligatorio. Espressione stringa in cui viene eseguita la ricerca.

stringa2

Obbligatorio. Espressione stringa che viene cercata.

confronto

Facoltativo. Valore numerico che determina il tipo di confronto tra sottostringhe. I possibili valori sono indicati nella sezione Impostazioni. Se omesso, viene eseguito un confronto binario.

Impostazioni
I possibili valori dell'argomento confronto sono:

Costante Valore Descrizione
vbBinaryCompare 0 Esegue un confronto binario.
vbTextCompare 1 Esegue un confronto testuale.


Valori restituiti
La funzione InStr restituisce i seguenti valori:

Se InStr restituisce
stringa1 è di lunghezza zero 0
stringa1 è Null Null
stringa2 è di lunghezza zero inizio
stringa2 è Null Null
stringa2 non viene trovata 0
stringa2 viene trovata all'interno di stringa1 Posizione in cui viene trovata la corrispondenza
inizio > Len(stringa2) 0


Osservazioni
Negli esempi seguenti viene illustrato l'utilizzo della funzione InStr:

Dim SearchString, SearchChar, MyPos
SearchString ="XXpXXpXXPXXP" ' Stringa in cui eseguire la ricerca.
SearchChar = "P" ' Esegue la ricerca della lettera "P".
MyPos = Instr(4, SearchString, SearchChar, 1) ' Confronto testuale a partire dalla posizione 4. Restituisce 6.
MyPos = Instr(1, SearchString, SearchChar, 0) ' Confronto binario a partire dalla posizione 1. Restituisce 9.
MyPos = Instr(SearchString, SearchChar) ' Per impostazione predefinita il confronto è binario (l'ultimo argomento è stato omesso). ' Restituisce 9.
MyPos = Instr(1, SearchString, "W") ' Confronto binario a partire dalla posizione 1. ' Restituisce 0 ("W" non viene trovato).
Nota È inoltre disponibile la funzione InStrB da utilizzare con dati byte inclusi in una stringa. Anziché restituire la posizione di carattere della prima occorrenza di una stringa all'interno di un'altra, questa funzione restituisce la posizione del byte.