下列程序运行后的输出结果是 下列程序运行后的输出结果是 Option base 1Private Sub Command1_Click()Dim a（10）,p(3) as integerk=5for i= 1 to10a(i)=inext ifor i=1 to 3p(i)=a(i)*inext ifor i=1 to 3k=k+p(i)*2next iprint kend sub