if clng(dati) = clng(numero) then
' qui fai butti giù questo altrimenti...
end if