以下程序运行后，Text的输出结果是：PrivateSubForm_Click()Dima%(to)，i%Fori=Toa(i)=*iText.Text=a(i)NextiEndSub