窗体上有Command1、Command2两个命令按钮。现编写以下程序: Option Base 0 Dim a()As Integer,m As Integer Private Sub Commandl_Click()

admin2019-01-17  45

问题 窗体上有Command1、Command2两个命令按钮。现编写以下程序:
    Option Base 0
    Dim a()As Integer,m As Integer
    Private Sub Commandl_Click()
       m=InputBox(”请输入一个正整数”)
       ReDim a(m)
    End Sub
    Private Sub Command2 Click()
       m=InputBox(”请输入一个正整数”)
       ReDim afm)End Sub
    运行程序时,单击Command1后输入整数10,再单击Command2后输入整数5,则数组a中元素的个数是

选项 A、5
B、6
C、10
D、11

答案B

解析 本题考查的考点是有关动态数组的。动态数组以变量作为下标值,在程序运行过程中完成定义,通常分为两步:首先在窗体层、标准模块或过程中用Dim或Public声明一个没有下标的数组(括号不能省略),然后在过程中随时用ReDim语句可以重定义变量作为下标的数组,重定义后原数组的所有元素值被清空。本题中由于数组下标从0开始,所以单击Commandl后输入10,数组被重定义成了11个元素;然后单击Command2输入5,数组又被重定义成了6个元素,所以最后数组中有6个元素。
转载请注明原文地址:https://kaotiyun.com/show/srFp777K
0

最新回复(0)