2. 计算机
  3. 窗体上有Command1、Command2两个命令按钮。现编写以下程序： Option Base 0 Dim a()As Integer， m As Integer Private Sub Command1_Click() 　　m＝InputBox("请

窗体上有Command1、Command2两个命令按钮。现编写以下程序： Option Base 0 Dim a()As Integer， m As Integer Private Sub Command1_Click() 　　m＝InputBox("请

admin2020-06-30  64
问题 窗体上有Command1、Command2两个命令按钮。现编写以下程序：
Option Base 0
Dim a()As Integer，  m As Integer
Private Sub Command1_Click()
　　m＝InputBox("请输入一个正整数")
　　ReDim a(m)
End Sub
Private Sub Command2_Click()
　　m＝InputBox("请输入一个正整数")
　　ReDim a(m)
End Sub
运行程序时，单击Command1后输入整数10，再单击Command2后输入整数5，则数组a中元素的个数是(　　)。
选项 A、5
B、6
C、10
D、11
答案B
解析 程序中Option Base 0表示指定数组的下标默认下界为0。ReDim语句用来重新定义动态数组，按定义的上下界重新分配存储单元。在一个程序中，可以多次用ReDim语句定义同一个数组，随时修改数组中元素的个数。程序中先执行ReDim a(10)，然后执行了ReDim a(5)，因此数组a的下界为0，上界为5，共有6个元素。
转载请注明原文地址:https://kaotiyun.com/show/XQHp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)