填空题

阅读以下程序:
Prlvate Sub Form_Click()
Dim k,n,m As Integer
n=10
m=1
k=1
Do While k<=n
m=m*2
k=k+1
Loop
Print m
End Sub程序运行后,单击窗体,输出结果为 【8】

【参考答案】

1024