[填空题] 阅读以下程序:
Private 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
单击窗体程序的执行结果是 【10】 。
正确答案:21
参考解析:[评析] 本题的循环体共要执行10次,m的最终值为1+2*10=21。
欢迎分享,转载请注明来源:内存溢出
[填空题] 阅读以下程序:
Private 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
单击窗体程序的执行结果是 【10】 。
正确答案:21
参考解析:[评析] 本题的循环体共要执行10次,m的最终值为1+2*10=21。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)