单项选择题

窗体上有单选钮和列表框控件。单击名称为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
以下关于上述代码的叙述中，正确的是( )。