题目内容:
阅读以下程序:
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】 。
参考答案:【答案仅供学习,请勿对照自行用药等】
答案解析:
阅读以下程序:
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】 。