问题详情

有如下程序，单击command1后窗体显示结果是()
OptionBase1
PrivateSubCommand1_Click()
Dima
a=Array(1,2,3,4,5)
Fori=LBound()ToUBound()
a(i)=i*a(i)
Nexti
Printi;UBound()
EndSub
A.65
B.625
C.不确定
D.程序出错