Advertisement
ak47suk1

nsbasic math addition

Sep 26th, 2013
87
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. ' We convert textbox3 to String for better practice
  2. Function Button1_onclick()
  3.   ' convert to double precision for correct decimal value
  4.  a = CDbl(TextBox1.value)
  5.   ' convert to double precision for correct decimal value
  6.  b = CDbl(TextBox2.value)
  7.   ' Automatic typeno need double precision here
  8.  c = a + b
  9.   TextBox3.value=CStr(c)
  10. End Function
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement