if val(text1.text) <> "0" then or "" then c = val(text1.text) * 1 + c but it show an error somebody help me

if val(text1.text) <> "0" or val(text1.text) <> "" then 
c = val(text1.text) * 1 + c
end if

If Val(Text1.Text) <> "0" Or Val(Text1.Text) <> vbNullString Then
c = Val(Text1.Text) * 1 + c
End If

commented: use code tags -1
Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.