有如下程序代码,输出结果是________。Dima()a=Array(1,2,3,4,5)fori=Lbound(a)toUbound(a)printa(i);nextI
A: 12345
B: 01234
C: 54321
D: 43210
A: 12345
B: 01234
C: 54321
D: 43210
举一反三
- 以下程序输出结果是()DimiAsIntegerDima()AsIngeger={1,2,3,4,5}Fori=LBound(a)toUBound(a)a(i)=a(i)*a(i)NextiConsole.WriteLine(a(i))
- 执行下面的程序,消息框的输出结果是______。 option Base 1 PrivateSubCommandl_Click() Dima(10),P(3)As Integer K=5 Fori=1 To 10 a(i)=i Nexti Fori=1 To 3 p(i)=a(i*i) NextI Fori=1 To 3 k=k+p(i)*2 Ncxti MsgBoxk End sub
- 以下程序的运行结果是() Subs1(b()AsInteger) Fori=1To4 b(i)=2*i Nexti EndSub PrivateSubCommand1_Click() Dima(1To4)AsInteger Fori=1To4 a(i)=i+5 Nexti s1a() Fori=1To4 Printa(i) Nexti EndSu A: 12141618 B: 6789 C: 2468 D: 1234
- 下列程序运行时输出的结果是( )。 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: 天天向上清华大学天上人间程序设计
- 在窗体上画一个命令按钮(其Name属性为Commandl),然后编写如下代码: Private Sub Commandl_Click() Dima(5) Fori=0 To 4 A(i)=i+1 t=i+1 If t=3 Then Print a(i) A(t-1)=a(i-2) Else A(t)=a(i) End If Ifi=3 Thena(i+1)=a(t-4) A(4)=1 Printa(i) NextI End Sub 程序运行后,单击命令按钮,输出结果是上______。