单选题 窗体上有一个名称为Command1的命令按钮,并有如下程序:
Private Sub Command1_Click()
x=15
Do While x>0
x=x-3
x=IIf(Int(x/5)=x,/5, x+2, x)
Loop
Print x
End Sub
程序运行后,单击命令按钮Command1,输出结果是______。
【正确答案】 B
【答案解析】[解析] 本题的关键是要读懂Do While循环中的IIf函数,该函数的条件是Int(x/5)=x/5。对于正数,Int()函数与Fix()函数的功能相同,只取整数部分,条件Int(x/5)=x/5说明x/5与其取整的结果相同,则x/5的结果只能是正数,也就是说x要能被5整除。可见,本题IIf函数的功能是判断x是否能被5整除,如果可以,则x=x+2;否则,x的值不变。x的初始值为15,执行Do While循环时满足x>0的条件,执行x=x-3=12,12不能被5整除,x=12不变;满足循环条件,第二次执行循环语句,x=9,不能被5整除,x=9不变,以此类推,直到x=3;x=3,执行循环语句,x=0,能被5整除,则x=2;x=2依然满足循环条件,执行循环语句,x=-1,不能被5整除,x=-1不变。此时,不满x>0的循环条件,循环结束,输出x的值-1。