2. 计算机
  3. 在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Option Base1 Private Sub Command1_Click() d=0:c=10:x=Array(10,12,21,32,24) For i=1 To 5 If x(i

在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Option Base1 Private Sub Command1_Click() d=0:c=10:x=Array(10,12,21,32,24) For i=1 To 5 If x(i

admin2016-12-13  35
问题 在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
Option Base1
Private Sub Command1_Click()
d=0:c=10:x=Array(10,12,21,32,24)
For i=1 To 5
If x(i)＞cThen
d=d+x(i):c=x(i)
Else
d=d-c
End If
Next i
Print d
End Sub
程序运行后，如果单击命令按钮，则在窗体上输出的内容为
选项 A、89
B、99
C、23
D、77
答案C
解析 本题的循环中依次用数组的每个元素和c进行比较，如果比c大就将数组元素累加，并令数组元素成为新的c值：甭则令累加和d减去c。在5次循环中d的累加过程为-10+12+21+32-32=23。
转载请注明原文地址:https://kaotiyun.com/show/kIGp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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