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

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

admin2010-09-11  39
问题 设有如下程序：    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的结果。
转载请注明原文地址:https://kaotiyun.com/show/srmp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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