窗体上有单选钮和列表框控件。单击名称为Option1、标题为“国家”的单选钮,向列表框中添加国家名称,如下图所示。 Option1的单击事件过程如下: Private Sub Option1.Click() Dim arr alT

admin2016-08-24  38

问题 窗体上有单选钮和列表框控件。单击名称为Option1、标题为“国家”的单选钮,向列表框中添加国家名称,如下图所示。

  Option1的单击事件过程如下:
  Private Sub Option1.Click()
    Dim arr
    alT=Array("中国","日本","德国","美国","澳大利亚")
    List1.Clear
    For i=0 To Ubound(aaa)
    List1.AddItem alT(i)
    Next
    End Sub
    以下关于上述代码的叙述中,正确的是(    )。

选项 A、程序有错,没有声明数组的维数及上下界
B、只有一维数组才能使用Array为数组赋初值
C、For循环的终值应为ListCount-1
D、For循环的初值应为1

答案B

解析 程序没有错误。数组变最定义时可以不用声明上下界。List控件列表项的索引从0开始。Arfay函数只适用于一组数组,只能对一维数组进行初始化,不能对二维数组或多维数组进行初始化。因此叙述正确的是B选项。
转载请注明原文地址:https://jikaoti.com/ti/SRJ0FFFM
0

最新回复(0)