Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ' We convert textbox3 to String for better practice
- Function Button1_onclick()
- ' convert to double precision for correct decimal value
- a = CDbl(TextBox1.value)
- ' convert to double precision for correct decimal value
- b = CDbl(TextBox2.value)
- ' Automatic typeno need double precision here
- c = a + b
- TextBox3.value=CStr(c)
- End Function
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement