[单项选择题] 下列程序段的执行结果是______。
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
正确答案:C

[单项选择题] 下列程序段的执行结果是______。
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
正确答案:C
上一篇 [填空题] 以下程序的功能是:把当前目录下的顺序文件smText1. txt的内容读入内存,并在文本框Text1中显示出来。请填空。 Private Sub Command1
下一篇 [填空题] 下面程序的功能是产生10个小于100(不含100)的随机正整数,并统计其中5的倍数所占比例,但程序不完整,请补充完整。 Sub PR( ) Randomize Dim a(10)