单项选择题

下面程序的执行结果是（）。
Private Sub Command1_Click()
a=10
For k=1 To 5 Step-1
a=a-k
Next k
Print a; k
End Sub

A．-5 6
B．-5 -5
C．10 0
D．10 1

<上一题目录下一题>

热门试题

单项选择题

窗体上有一个名为Command1的命令按钮，并有如下程序： Private Sub Command1_Click() Dim a(10), x% For k=1 To 10 a(k)=Int(Rnd*90+10) x=x+a(k)Mod 2 Next k Print x End Sub 程序运行后，单击命令按钮，输出结果是（）。

A．10个数中奇数的个数
B．10个数中偶数的个数
C．10个数中奇数的累加和
D．10个数中偶数的累加和

单项选择题

阅读程序： PrivateSubCommand1_Click（） Dimarr DimiAsInteger art=Array（0，1，2，3，4，5，6，7，8，9，10） Fori=0To2 Printarr（7-i）； Next EndSub 程序运行后，窗体上显示的是（）。

A．8 7 6
B．7 6 5
C．6 5 4
D．5 4 3

相关试题