问题
单项选择题
设有如下程序：
Private Sub Command1_Click()
Dim C As Integer, d As Integer
c=4
d=InputBox("请输入一个整数")
Do While d＞0
If d＞c Then
c=c+1
End If
d=InputBox("请输入一个整数")
Loop
Print c+d
End Sub
程序运行后，单击命令按钮，如果在输入对话框中依次输入1、2、3、4、5、6、7、8、9、0，则输出结果是______。
A．12
B．11
C．10
D．9
答案
参考答案：D
解析：
[分析]： 在输入对话框中依次输入1～4时，因d＞c的结果为Falsc，变量c没有进行任何计算；输入5～9时，因d＞c的结果为True，变量c的计算过程为：4+1+1+1+1+1=9；输入0时，退出DO循环，最后打印出9+0=9的结果。