ho risolto con questo
Individuazione di una sottostringa - Le funzioni Instr e InstrRev
Per capire se una stringa contiena al suo interno una sottostringa ci sono due funzioni speculari InStr e InstrRev
La funzione InStr prende in input la posizione di partenza da cui deve iniziare il confronto, che puo essere omessa, la stringa principale e la sottostringa che si vuole ricercare. Come ultimo parametro opzionale è possibile specificare il tipo di confronto: 0 per binario, 1 per testuale
Dim a As String, b As String
a = "qwertyuiopaer"
b = "Er"
MsgBox (InStr(a, b)) ' risultato 0 perchè il confronto è binario e quindi case sensitive
MsgBox (InStr(1, a, b, 1)) ' risultato 3 perché trova la prima occorrenza er
MsgBox (InStr(5, a, b, 1)) ' risultato 12 perché la ricerca parte dal quinto
'carattere quindi viene individuata l'occorrenza finale
L'altra funzione InStrRev è simile alla precedente in quanto restituisce la posizione di un'occorrenza di una stringa inclusa in un'altra a partire dalla fine della stringa.
|