问题 单项选择题

以下程序运行后输出的结果是 ______。
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数组无此元素,故产生下标越界的错误。

选择题
填空题