窗体上有单选钮和列表框控件。单击名称为Option1、标题为"国家"的单选钮,向列表框中添加国家名称,如下图所示。 Option1的单击事件过程如下:Private Sub Option1_Click() Dim arr arr=Array("中国","日本","德国","美国","澳大利亚") List1.Clear For i=0 To Ubound(arr) List1.AddItem arr(i) Next End Sub以下关于上述代码的叙述中,正确的是( )。
复制题目向AI提问
Option1的单击事件过程如下:Private Sub Option1_Click() Dim arr arr=Array("中国","日本","德国","美国","澳大利亚") List1.Clear For i=0 To Ubound(arr) List1.AddItem arr(i) Next End Sub以下关于上述代码的叙述中,正确的是( )。
A.程序有错,没有声明数组的维数及上下界
B.只有一维数组才能使用Array为数组赋初值
C.For 循环的终值应为ListCount-1
D.For 循环的初值应为1
答案:B。
解析:【解析】程序没有错误。数组变量定义时可以不用声明上下界。List控件列表项的索引从0开始。Array函数只适用于一组数组,只能对一维数组进行初始化,不能对二维数组或多维数组进行初始化。因此叙述正确的是B选项。">
content_copy