问题
单项选择题
窗体上有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后输入整数8，再单击Command2后输入整数4，则数组a中元素的个数是______。
A) 4
B) 5
C) 8
D) 9
答案
参考答案：B
解析： 数组a(m)中，m表示的是数组中元素的个数，各元素的下标值为0～m。在给出的程序中，为m赋了两次值，但第二次的值会覆盖第一次的值，所以答案选B) 。