Ciclo for su stringa caratteri speciali

[slay]

ciao a tutti ho questo codice:

srtr1=rs(""&campoora&"")
        listacaratteri= Array("/","'","£","%","&","!","|","(",")","_","\","~")
        for iii = 0 to Ubound(listacaratteri)
        carattereora=listacaratteri(iii)
        
            IF INSTR(srtr1,carattereora) > 0 THEN 
                caratterispeciali="si"
            ELSE 
                caratterispeciali="no"
            END IF 
        
        next 

mi controlla se una stringa contiente i caratteri speciali presente in listacaratteri però non funziona benissimo ad esempio se la stringa contiene ~ funziona ma se la stringa contiene _ oppure ( o ) non funziona .. avete qualche idea del perchè?

[slay]

[MMarzia]

Originariamente inviato da slay
mi controlla se una stringa contiente i caratteri speciali presente in listacaratteri però non funziona benissimo ad esempio se la stringa contiene ~ funziona ma se la stringa contiene _ oppure ( o ) non funziona .. avete qualche idea del perchè?

Funziona, in realtà ti sembra il contrario perchè nel ciclo vai a sovrascrivere la variabile perdendo un eventuale valore "si" (tranne nel caso di ~, ultimo elemento dell'array). Se quello che ti interessa sapere è che la stringa contenga almeno uno dei caratteri speciali puoi aggiungere un exit for:

IF INSTR(srtr1,carattereora) > 0 THEN
  caratterispeciali="si"
  exit for
ELSE
  caratterispeciali="no"
END IF

Oppure leggi la variabile all'interno del ciclo stesso.

[slay]

azzzz ...ehh si giusto ... con exit for funzia