问题 单项选择题

假定有如下事件过程:
Private Sub Form Click()
Dim x As Integer, n As Integer
x=1
n=0
Do While x<28
x=x*3
n=n+1
Loop
Print x, n
End Sub
程序运行后,单击窗体,输出结果是______。

A.81 4

B.56 3

C.28 1

D.243 5

答案

参考答案:A

解析:

[分析]: Do While-Loop循环语句的判断条件为“x<28”。循环语句“x=x*3”的作用是每循环一次将成为原数的3倍,而变量n用来记录循环次数,当循环3次后,x得27,有27<28,再循环一次后x得81,有81>28,不再满足循环条件,此时n为4。执行Print语句,输出x和n的值,即输出81和4。

实验题
问答题 简答题