结果等于406900,但VB无法计算出来，因为溢出了。但VBScript却能正常计算。

VB6:


----------------------------------------

VBScript:

[此贴子已经被作者于2022-9-16 08:50编辑过]

VB写成这样却能正常计算，好变态。

我去， 代码都来了。

MsgBox 25 + 25 * 25 + 25 * 25 * 25 + 25& * 25 * 25 * 25

25*25*25*25=390625，为节省内存，第1个25默认是整型最大是32767，所以溢出了，强制把第1个25定义为长整型就不会溢出了
VBS中只有Variant型，自动适应数据，这点数据不会溢出

还真是的，你又是怎么知道的?

vb6计算是默认Integer类型，范围是-32,768 到 32,767  

25+25*25+25*25*25+25*25*25*25

Dim a, b As Long
a = 25
b = a + a * a + a * a * a + a * a * a * a
MsgBox b