设有如下程序: Private Sub Command1_Click()   Dim c As Integer,d As Integer   c=4   d=InputBox("请输入一个整数")   Do While d>0

admin2012-03-22  25

问题 设有如下程序:    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

解析
转载请注明原文地址:https://kaotiyun.com/show/sFhp777K
0

随机试题
最新回复(0)