问题
填空题
为某个窗体编写如下事件，单击窗体，消息框显示的结果为 。
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
解析： D。While语句是先判断条件，如果条件为True，则执行循环体。本题中的条件表达式是k＜=n，而刚开始k=1，n=10，而循环一次k就加1，故一共要执行10次循环。而m每执行一次就乘2，故一共乘了10次2，最后m的值为1024。