[填空题] 设有如下程序：
Private Sub Form_Click()
Dim a As Integer，s As Integer
n=8：s=0
Do
s=s+n：n=n-1
Loop While n＞0
Print s
End Sub
以上程序的功能是计算1-8的和。程序运行后，单击窗体，输出结果为______。
正确答案：36
参考解析：Do…While语句的循环运算次数为8次，当n减小到O时跳出循环。所以经运算s=1+2+3+4+5+6+7+8，其结果为36。
![[填空题] 设有如下程序： Private Sub Form](http://www.mshxw.com/aiimages/31/479046.png "[填空题] 设有如下程序： Private Sub Form")
[填空题] 设有如下程序：
Private Sub Form_Click()
Dim a As Integer，s As Integer
n=8：s=0
Do
s=s+n：n=n-1
Loop While n＞0
Print s
End Sub
以上程序的功能是计算1-8的和。程序运行后，单击窗体，输出结果为______。
正确答案：36
参考解析：Do…While语句的循环运算次数为8次，当n减小到O时跳出循环。所以经运算s=1+2+3+4+5+6+7+8，其结果为36。
上一篇 [填空题] 以下程序的功能是：把当前目录下的顺序文件smtext1.txt的内容读入内存，并在文本框 Text1中显示出来。请填空。 Private Sub Command1
下一篇 [填空题] 有一过程如下： Sub Subl (m As Integer,total As Long) Dim i AS Integer total = 1 For i = 1 To
名师互学网 版权所有 (c)2021-2022 ICP备案号：晋ICP备2021003244-6号
