2.下面程序段运行后输出的结果是________.VB.NET题DimiAsIntegerDima()AsInteger={1,2,3,4,5,6,7,8,9}Fori=0ToUBound(a)a(i)=a(i)*a(i)NextiMsgBox(a(2))

　　2.下面程序段运行后输出的结果是________.

　　VB.NET题

　　DimiAsInteger

　　Dima()AsInteger={1,2,3,4,5,6,7,8,9}

　　Fori=0ToUBound(a)

　　a(i)=a(i)*a(i)

　　Nexti

　　MsgBox(a(2))