问题 填空题

某个窗体己编写以下事件过程。打开窗体运行后,单击窗体,消息框的输出结果为 【11】
Private Sub Form_Click()
Dim k as Integer, n as Integer,m as Integer
n=10 :m=1 : k=1
Do While k<=n
m=m*2
k=k+1
Loop
MsgBox m
End Sub

答案

参考答案:1024

解析: 本题考查考生对VBA中控制结构的掌握。考生应该重点掌握VBA的控制结构,本题中的Do While…Loop循环结构是考试重点内容。在题目所给程序中,第一次循环结束后,m=1*2=2,即21;第二次循环结束后, m=2*2=4,即22;可见每次循环都使得m变为原来大小的2倍。因为k的初始值为1,终止条件为k<=10,所以循环一共可以执行10次,因此m最后的值应该为210,即1024。

单项选择题
单项选择题