Can i add, subtract, times, divide 40 digit number to 40 digit number ...

example:

dim a as double = 1111111111111111111111111111111111111
dim b as double = 1111111111111111111111111111111111111
dim c as double

c = a + b

msgbox(c)

output: 1.11122222222222E+28

is there a way to get the acurate answer???? plz help ...