2. 计算机
  3. 设有如下程序： Private Sub Command1_Click() 　　Dim c As Integer,d As Integer 　　c=4 　　d=InputBox("请输入一个整数") 　　Do While d＞0

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

admin2012-03-22  57
问题 设有如下程序：    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
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)