有如下程序：Constn=-5Constm=6Dima(nTom)AsIntegerFori=LBound(a,1)ToUBound(a,1)a(i)=iNextiPrinta(LBound(a,1));a(UBound(a,1))运行后输出的结果为（）。
举一反三
- 有如下程序： Const N＝－5 Const M＝6 Dim a(N To M)As Integer For i＝LBound(a)To UBound(a) a(i)＝ i Next i Print a(LBound(a))；a(UBound(a)) 运行后，输出结果为( )。
- a(LBound(a))和a(UBound(a))的值分别是_______.Dima(-1To6)Fori=LBound(a)ToUBound(a)a(i)=iNexti A: 00 B: -50 C: -16 D: 06
- 下列程序运行时输出的结果是( )。 Private Sub Form_Click() Dima a=Array("天天向上"，"清华大学"，"天上人间"，"程序设计") forI=Lbound(a，1) to Ubound(a，1) ifleft(a(i)，1)="天"then print a(i)； nextI End Sub A: 天天向上 B: 天天向上天上人间 C: 出错信息 D: 天天向上清华大学天上人间程序设计
- 有如下程序代码,输出结果是________。Dima()a=Array(1,2,3,4,5)fori=Lbound(a)toUbound(a)printa(i);nextI A: 12345 B: 01234 C: 54321 D: 43210
- 以下程序输出的结果是: Private Sub Form_Activate() Dim a a=Array(1,2,3,4,5) For i=Lbound(((A) To Ubound(((A) A(i)=i*a(i) Next i Print i, Lbound(((A) , Ubound(((A) , a(i) End Sub