单选题运行下列程序，输入数据8、9、3、0后，窗体中显示的结果是______。
Private Sub Form_click()
Dim sam 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

【答案解析】[解析] 本题程序实现了一个求和循环。首先，程序定义了两个整型变量sum和m，为sum赋初值0，在Do…Loop Until循环中，通过语句“m=InputBox("输入m")”收集键盘输入的数据，将该数据赋值给变量m，并执行语句“sum=sum+m”，将所有输入的数据累加，累加结果放入变量sum中，直到输入数据为“0”，满足循环结束条件“m=0”为止。在本题要求中，依次输入数据8、9、3、0，所以，程序运行后窗体显示结果为：20。所以本题答案为C。