窗体上有Commandl、Command2两个命令按钮。现编写以下程序:OptionBase 0Dim a()As Integer,m As IntegerPrivate Sub Commandl_Click()m=InputBox(”请输入一个正整数”)ReDim a(m)End SubPrivate Sub Command2_Click()in=InputBox(”请输入一个正整数”)ReDim a(m)End Sub运行程序时,单击Commandl后输入整数10,再单击Command2后输入整数5,

题目

窗体上有Commandl、Command2两个命令按钮。现编写以下程序:

OptionBase 0

Dim a()As Integer,m As Integer

Private Sub Commandl_Click()

m=InputBox(”请输入一个正整数”)

ReDim a(m)

End Sub

Private Sub Command2_Click()

in=InputBox(”请输入一个正整数”)

ReDim a(m)

End Sub

运行程序时,单击Commandl后输入整数10,再单击Command2后输入整数5,则数组a中元索的个数是

A.5

B.6

C.10

D.11


相似考题
参考答案和解析
正确答案:B
解析:数组a(m)中,m表示的是数组中元素的个数,各元素的下标值为O-m。在给出的程序中,为m赋了两次值,但第二次的值会覆盖第一次的值,所以答案选B。
更多“窗体上有Commandl、Command2两个命令按钮。现编写以下程序:OptionBase 0Dim a()As Integer,m As In ”相关问题
  • 第1题:

    在窗体上有1个名称为Commandl的命令按钮,并有如下事件过程和函数过程:

    Private Sub Commandl Click()

    Dim P As Integer

    p=m(1)+m(2)+m(3)

    Print P

    End Sub

    Private Function m(n As Integer)As Integer

    Static s As Integer

    For k=1 To n

    s=s+l

    Next

    m=s

    End Function

    运行程序,单击命令按钮Commandl后的输出结果为


    正确答案:10
    10

  • 第2题:

    在窗体上添加一个命令按钮,名称为Commandl,然后编写如下事件过程: Option Base 0Private Sub Commandl_Click() Dim cityAs VariantCity=.Array("北京", "上海","天津”, "重庆")Print city(1)End Sub程序执行后,如果单击命令按钮,则在窗体上显示的内容是( )。

    A.空白

    B.错误提示

    C.北京

    D.上海


    正确答案:D
    暂无解析,请参考用户分享笔记

  • 第3题:

    在窗体中添加一个命令按钮,名称为Commandl,然后编写如下程序:

    窗体打开运行后,单击命令按钮,则消息框的输出结果为__________。


    正确答案:
    2500【解析】本题考查循环的知识。这个问题比较简单,实际上就是求l到100之间的奇数和,最终结果为2500。

  • 第4题:

    窗体上添加有3个命令按钮,分别命名为Commandl、Command2和Command3,编写Commandl的单击事件过程,完成的功能为:当单击按钮Commandl时,按钮Command2可用,按钮Command3不可见。以下正确的是( )。

    A.

    B.

    C.

    D.


    正确答案:C
    本题考查控件的可见和可用属性的知识。在VBA中,要想使某个控件可用,则使其Enabled属性为True要想使某个控件可见,则使其Visible属性为True.所以本题正耐答案为C。

  • 第5题:

    在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程. Option Base 0 Private Sub Command1_Click Dim city As Variant city=Array(“北京”,“上海”,“天津”,“重庆”) Print city(1) End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是

    A.空白

    B.错误提示

    C.北京

    D.上海


    正确答案:D
    解析:本题主要考查数组的初始赋值。由于有“OptionBase0”,所以以Array函数赋值的数组下标下界为0。所以city(1)指Array赋给city的第二个元素,即“上海”,故本题选D。