Problème avec la fonction nz()

Bonjour,
j'ai un formulaire de calcul qui contient des zones de texte
j'essaye de faire la somme des valeurs des zones de texte mais j'ai des zones de texte qui peuvent rester vides et j'ai une erreur d'excecution 94 "utilisation incorrecte de null" et je sais pas comment utiliser la fonction nz()
voici mon code:

Private Sub Commande48_Click()

Dim a As Single
Dim b As Single
Dim c As Single
Dim d As Single
Dim e As Single
Dim tot As Single

a = Texte19.Value
b = Texte27.Value
c = Texte31.Value
d = Texte35.Value
e = Texte46.Value

tot = a + b + c + d + e
Texte41.Value = tot


End Sub

svp si quelqu'un peut m'aider pour me dire comment integrer la fonction nz dans mon code de façon à ce qu'il ignore les zones de texte vides.
merci d'avance