填空题

阅读以下程序：
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】。

【参考答案】

(10)21

<上一题目录下一题>

热门试题

填空题

程序执行结果S的值是【11】。 Private Sub Command1_Click() i=0 Do i=i+1 s=i+s Loop Until i＞=4 Print s End Sub

填空题

一个控件在窗体上的位置由Top和Left属性决定，其大小由【6】和【7】属性决定。

阅读以下程序： 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】 。