窗体上有一个名称为Commandl的命令按钮，并有如下程序： Private Sub Commandl Click() x=15 Do While x2>0 x=x-3 x=IIf(Int(x／5)=x／5，X+2，

admin2012-12-21 29

问题窗体上有一个名称为Commandl的命令按钮，并有如下程序：
Private Sub Commandl Click()
x=15
Do While x2>0
x=x-3
x=IIf(Int(x／5)=x／5，X+2，x)
Loop
Print X
End Sub
程序运行后，单击命令按钮Commandl，输出结果为( )。

选项 A、0
B、-1
C、-2
D、-3

答案B

解析根据算法，第一次循环，x=14，第二次循环，x=11．第三次，x=8，以此类推，x=5，2，-1，当<0时，x为一1。

转载请注明原文地址:https://jikaoti.com/ti/3EO0FFFM

本试题收录于：二级VB题库NCRE全国计算机二级分类