[单项选择题] 在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:
Option base 1
Private Sub Command1_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 i
Print d
End Sub
程序运行后,如果单击命令按钮,则在窗体上输出的内容为______。
A.10
B.16
C.12
D.20
正确答案:C解析:[分析]: 当x(i)的值分别为2、4、6时,变量d的值为0-6-6-6=-18。当x(i)的值分别为8、10、12时,d为-18+8+10+12=12。其中,将x(i)的值赋给变量c,对d的运算没有影响。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)