버튼 클릭시 Null 오류가 발생했습니다.

Question

많은 계산이있는 액세스 데이터베이스가 있습니다. 내가 겪고있는 문제 중 하나는 여러 개의 텍스트 상자가 있고 액세스 할 때 수식을 계산하기 전에 데이터에 모든 데이터를 입력해야한다는 것입니다. 나는 그것이 모든 널 (null)을 무시하도록 설정하려면 어떻게해야 널

의 잘못된 사용 : 나는

런타임 오류 '94'

빈 텍스트 상자를 떠날 때 나는 오류가 점점 계속. 여기 내 코드는

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 

어떤 도움이 될 것입니다. 감사! 당신의 상황에서

Answer 1

, 나는 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