codice:
Dim stringa as String

Stringa = Valore Db

if IsDbNull(Stringa) then
stringa = ""
End if