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