请问如何使VB进行精确计算啊?我希望计算结果至少有100位有效数字

来源:百度知道 编辑:UC知道 时间:2024/04/30 05:59:00
例如如下算派的语句
For i = 1 To 6000 Step 1
a = ((2 * i - 1) * (-1) ^ (i + 1))
b = b + 1 / a
Next i
Print b * 4
应该结果应该至少前5位应该跟派是相同的,但是误差相当的大,请问如何精确计算啊?

把a,b定义为Double类型,i定义为Long
把6000改为2000000,
计算得出的结果为:
3.14159215358972

这样精度差不多了吧,运行次数为6000时,是运算次数太少,所以精度没有上来. 如果需要更精确,可以再增加运算次数.
当次数增加到20000000时,结果为:3.14159260358986