第1题
3有如下程序,输出结果为()。 Private Sub Form_Activate() Dima a=Array(1,2,3,4,5) Fori=LBound(a)To UBound(A) a(i)=i*a(i) Nexti Printi,LBound(a),UBound(a),a(i) End Sub
A.4 0 4 25
B.5 0 4 25
C.不确定
D.程序出错
第2题
A.65
B.625
C.不确定
D.程序出错
第4题
执行下面的程序,消息框的输出结果是______。
optionBase1
PrivateSubCommandl_Click()
Dima(10),P(3)AsInteger
K=5
Fori=1To10
a(i)=i
Nexti
Fori=1To3
p(i)=a(i*i)
NextI
Fori=1To3
k=k+p(i)*2
Ncxti
MsgBoxk
Endsub
第5题
下列程序运行时输出的结果是()。 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.天天向上清华大学天上人间程序设计
第6题
下面程序运行后,输出结果是()。 Private Sub mysub(b()As Integer,OptionalByValnAsInteger=2) ForI=1 to 4 b(I)=n*I NextI End Sub Private Sub Commandl_Click() Dima(1 to 4)As Integer,I As Integer Callmysub(a(),5) Mysuba() ForI=1 to 4 Prin
A.5101520
B.2468
C.出错
D.0000
第7题
窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是
Private Sub Command1_Click()
Dim a
a=Array(1,2,3,4,5)
For k=1 To 4
s=s+a(k)
Next
Print S
End Sub
A.10
B.14
C.15
D.120
第8题
窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是()。
Private Sub Command1_Click()
Dim a
a=Array(1,2,3,4,5)
For k=1 To 4
S=s+a(k)
Next k
Print s
End Sub
A.10
B.14
C.15
D.120
第9题
窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是()。 Private Sub Command1_Click() Dim a a=Array(1,2,3,4,5) Fork=1 To 4 S=S+a(k) Next k Print S End Sub
A.10
B.14
C.15
D.120
第10题
窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是 Private Sub Command1_Click() Dim a a = Array(1,2,3,4,5) For k = 1 To4 s=s+a(k) Next Print S End Sub
A.10
B.14
C.15
D.120
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!