运行下列程序,输入数据8、9、3、0后,窗体中显示结果是 Private Sub Form_click0 Dim sum As Integer,m As Integer sum=O Do m

admin2020-09-01  18

问题 运行下列程序,输入数据8、9、3、0后,窗体中显示结果是
    Private Sub Form_click0
       Dim sum As Integer,m As Integer
       sum=O
       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/r3Q0FFFM
0

最新回复(0)