单选题 有如下程序。运行后在输入对话框中依次输入1、2、3、4、5、6、7、8、9、0，则输出结果是(    )。
   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
   MsgBox c+d
   A．9    B．10    C．11    D．12