【单选题】

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

Option1的单击事件过程如下：
Private Sub Option1_Click()
Dim arr
arr =Array( "中国", "日本", "德国", "美国", "澳大利亚" )
List1.Clear
For i =0 To Ubound(arr)
List1.AddItem art(i)
Next
End Sub
以下关于上述代码的叙述中，正确的是()。
A、程序有错，没有声明数组的维数及上下界
B、只有一维数组才能使用Array为数组赋初值
C、For循环的终值应为ListCount-1
D、For循环的初值应为1