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

admin2017-06-22  34

问题 运行下列程序,输入数据8、9、3、0后,窗体中显示结果是
    Private 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/B020FFFM
0

最新回复(0)