问题
单项选择题
以下程序运行后输出的结果是 ______。
Option Base 1
Private Sub Form_Click()
Dim A(20)
For K=1 To 20
A(K)=K^2
Next K
Print A(K)
End Sub
A.20
B.441
C.400
D.出错信息
答案
参考答案:D
解析: 本题定义A是一个一维数组,数组元素的下标范围允许为1~20。在循环中,将下标变量的平方赋给该数组的每个元素。当循环结束后,输出A数组的第K个元素的值,但此时K的值是21,A数组无此元素,故产生下标越界的错误。