单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Option Base 1 Private Sub Command1_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 程序运行后，单击命令按钮，则在窗体上显示的内容是( )。