设有如下程序: 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,则输出结果是( )。