问题
单项选择题
假定有如下事件过程： Private Sub Form Click() Dim x As Integer, n As Integerx=1n=0Do While x＜28 x=x*3 n=n+1LoopPrint 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。