运行下列程序,输入数据8、9、3、0后,窗体中显示结果是 Privste Sub Form_click() Dim sum As Integer,m As Integer sum=0 Do m=InputBox("输入m") sum=sum+m Loop

admin2020-06-06  43

问题 运行下列程序,输入数据8、9、3、0后,窗体中显示结果是
Privste Sub Form_click()
Dim sum As Integer,m As Integer
sum=0
Do
m=InputBox("输入m")
sum=sum+m
Loop Until m=0
MsgBox sum
End Sub

选项 A、0
B、17
C、20
D、21

答案C

解析 Do…Until Loop循环结构是当条件为假时,重复执行循环体,直至条件表达式为真,结束循环。当输入8、9、3三个数字条件(m=0)不成立,所以累加,直到输入0后结束,即8+9+3=20。
转载请注明原文地址:https://jikaoti.com/ti/RrQ0FFFM
0

相关试题推荐
最新回复(0)