单项选择题

下列程序段的执行结果是______。 option base 1 private eommand1_c1ick () Dim A(10) Dim E(5) For i = 1 To 10 A(i) = i Next i For j = 1 To 5 B(j) = j * 20 Next j A(5) = B(2) Print “A(5)=”; A(5) End sub

A．A(5)=20
B．A(5)=30
C．A(5)=40
D．A(5)=50
<上一题 目录 下一题>
热门 试题

单项选择题
单击一次命令按钮之后，下更程序代码的执行结果为______ 。 Public Sub Proc(a() As Integer) Static i As Integer Do a(i) = a(i) + a(i + 1) i=i+1 Loop While i ＜ 2 End Sub Private Sub Command1_Cliek() Dim m As Integer Dim i As Integer Dim x(10) As Integer For i = 0 To 4 x(i) = i + 1 Next i For i = 1 To 2 Call Proc (x) Next i For i = 0 To 4 Print x(i); Next i End Sub
A．3 4 7 5 6
B．3 5 7 4 5
C．1 2 3 4 5
D．1 2 3 5 7
单项选择题
23 有如下程序段，该程序段循环的次数是______。 Dim i As Integer Dim j As Integer Dim k As Integer k=0 For i = 0 To 10 Step 3 For j = 1 To 5 If j ＞ 3 Then k = k + 4: Exit For k=k+1 Print k Next j If i ＞ 8 Then Exit For Next i
A．9
B．10
C．11
D．12
相关试题