long数据类型溢出有什么办法？该如何处理

long数据类型溢出有什么办法？
一个远远超出long范围的数进行计算怎么办？？
不要告诉我用currency类型或另外一些数据类型代替，
这个数值超出所有数据类型的范围～有什么办法～？

------解决方案--------------------
呵呵，晕倒了！
楼主仔细看看上面几个提供代码的地址，代码中都有示例。看能不能运算？

是不是认为数字就要用数值类型来存放？其实你以它符类存放，自己写代码来运算，结果输出为字符型（但显示出来也是一串数字），怎么不能运算？怎么一直转不过弯呢？

------解决方案--------------------
fxy_2002(阿勇) 升猩猩是很久以前的事儿了！
我这个阿勇就不行了！
－－－－－－－－－－－－－
楼主，我写个最简单的字符串加法运算
Private Sub Form_Load()
'一个简的大数加法，没有详细考虑，可能不周全
Dim str1 As String, str2 As String, strResult As String
Dim tmp1 As Integer, tmp2 As Integer, flag As Integer, l As Long
Dim i As Long
str1 = "11123345643653464564364368 "
str2 = "17867888888888889 "
l = IIf(Len(str1) > Len(str2), Len(str2), Len(str1))
i = l
Do While i > 0
tmp1 = Val(Mid(Right(str1, l), i, 1))
tmp2 = Val(Mid(Right(str2, l), i, 1))
strResult = CStr((tmp1 + tmp2 + flag) Mod 10) & strResult
i = i - 1
If tmp1 + tmp2 + flag > 9 Then flag = 1 Else flag = 0
Loop
If l < Len(str1) Then strResult = Mid(str1, 1, Len(str1) - l) & strResult
If l < Len(str2) Then strResult = Mid(str2, 1, Len(str2) - l) & strResult
Debug.Print strResult
End Sub