2. 计算机
  3. 设有如下程序： Private Sub Command1_Click( ) Dim c As Integer，d As Integer c=4 d=I

设有如下程序： Private Sub Command1_Click( ) Dim c As Integer，d As Integer c=4 d=I

admin2013-01-23  26
问题 设有如下程序：            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 lf                  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
答案8
解析 本题中最后输入0时结束循环，所以最后d的值为0，故判断输出结果其实就是计算c的值，c从输入5开始(除最后的0)每次加1(共5次)，所以c最后为9。
转载请注明原文地址:https://jikaoti.com/ti/9QO0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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