codice:
if instr(1,stringaCheDeveContenereIlCar,"%") > 0 then
  'lo contiene
else
  'non lo contiene
end if