Erreur Null sur le bouton Cliquez sur

Question

J'ai une base de données d'accès contenant un certain nombre de calculs. Un des problèmes que je rencontre est que j'ai plusieurs zones de texte et l'accès veut que j'entre toutes les données avant de calculer la formule. Je continue de recevoir une erreur quand je quitte une zone de texte vide

Erreur d'exécution « 94 »: utilisation incorrecte de NULL

Comment puis-je configurer pour ignorer toutes les valeurs nulles. Voici mon code

Public Function calculate() as double 
calculate = cdbl(textbox1.value) * cdbl(textbox2.value) * cdbl(textbox3.value) * cdbl(textbox4.value)/144 
End Function 

Private Sub btn1_click() 
Dim x as double 
x = calculate 
textbox5.value = x 
End Sub 

Toute aide serait aprecciated. Merci!

Answer 1

Dans votre cas, j'utiliser the NZ method.

calculate = cdbl(nz(textbox1.value,1)) * cdbl(nz(textbox2.value,1)) * cdbl(nz(textbox3.value,1)) * cdbl(nz(textbox4.value,1))/144