【单选题】

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：

OptionBase 1
Private SubCommand1_Click()
Dim a
a=Array(1,2,3,4,5)
For i=1 To UBound(a)
a(i)=a(i)+i-1
Next
Print a(3)
End Sub
程序运行后，单击命令按钮，则在窗体上显示的内容是()。
A．4
B．5
C．6
D．7