2. 计算机
  3. 在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序： Option Base 1 Private Sub Commandl_Click() Dim c AS Integer，d As Integer d=0

在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序： Option Base 1 Private Sub Commandl_Click() Dim c AS Integer，d As Integer d=0

admin2009-02-10  61
问题 在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序：  Option Base 1  Private Sub Commandl_Click()      Dim c AS Integer，d As Integer      d=0      c=6      x=Array(2,4,6,8,10,12)      For i=1 To 6          If x(i)＞c Then              d=d+x(i)              c=x(i)          ElSe              d=d-c          End If      Next          Print d    End Sub    程序运行后，如果单击命令按钮，则在窗体上输出的内容为
选项 A、 10
B、16
C、12
D、20
答案C
解析 Array函数是为数组赋值，而Option Base l是用来设置数组下标是从1开始。由于刚开始c的值为6，故前三个数组值不大于c，执行三次d=d-c，d=-18；而后三个数组值都大于c，执行三次d二d+ x(i)，d=-18+8+10+12=12。
转载请注明原文地址:https://www.kaotiyun.com/show/ad2p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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