题目内容:
运行下列程序,输入数据8、9、3、0后,窗体中显示结果是( )。Prirate 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
参考答案:
Prirate 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