[填空题] 阅读以下程序:
Private Sub Form_click()
Dim k, n, m As integer
n = 20
m = 1
k = 1
Do While k <= n
m=m+2
k = k + 1
Loop
Print m
End Sub
单击窗体程序的执行结果是 【4】 。
参考答案:
41问题解析:
本题的循环体共要执行20次,m的最终值为1+2*20=41。
[填空题] 阅读以下程序:
Private Sub Form_click()
Dim k, n, m As integer
n = 20
m = 1
k = 1
Do While k <= n
m=m+2
k = k + 1
Loop
Print m
End Sub
单击窗体程序的执行结果是 【4】 。
参考答案:
41问题解析:
本题的循环体共要执行20次,m的最终值为1+2*20=41。