Question

某Visual Basic程序段如下： Dim a(1 To 10) As Integer Dim i As Integer a(1) = 1 For i = 2 To 10 a(i

某Visual Basic程序段如下：
Dim a(1 To 10) As Integer
Dim i As Integer

a(1) = 1
For i = 2 To 10
a(i) = a(i - 1) * i
Next
i
运行该程序段，会出现的错误提示为

（A）下标越界 （B）子程序或函数未定义 （C）要求对象 （D）溢出

已知答案是D，不求答案求解析

Answer 1

数组a的类型为integer，这个类型的表示范围最大是-32768 到 32767，循环赋值的时候超过了这个值，就溢出了，你改个数据类型就对了