Rieccomi

Scusate ma sono ancora (e ancora per molto) un principiante di VB

Faccio una ricerca nel database e posiziono i risultati nel mio form, e fino qui tutto bene, il problema sorge quando raccolgo dei risultati con valore "Null",

Non posso mettere un controllo su ogni sigolo campo quindi vorrei sapere se è possibile mettere un controllo su tutti

codice:
Dim sSearch As String
Dim Db As Database
Dim Rs As Recordset
If Text1 <> "0" Then
sSearch = "select * from [Anagrafico Incarico] where ID = " & Text1 & ""
Set Db = OpenDatabase(App.Path & "\database.mdb", False, False)
Set Rs = Db.OpenRecordset(sSearch)
Set Data1.Recordset = Rs

Nome = Rs!Nome
Cognome = Rs!Cognome
CodiceFiscale = Rs![Codice Fiscale]
LuogodiNascita = Rs!Città
DatadiNascita = Rs![Nato/a il]








Else

Label1 = ";-))"

End If

Rs.Close
La parte in grassetto e quella incriminata

Grazie Mille