![[单项选择题] 在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:Option Base 1Private Sub Command1,第1张 [单项选择题] 在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:Option Base 1Private Sub Command1,第1张](/aiimages/%5B%E5%8D%95%E9%A1%B9%E9%80%89%E6%8B%A9%E9%A2%98%5D+%E5%9C%A8%E7%AA%97%E4%BD%93%E4%B8%8A%E7%94%BB%E4%B8%80%E4%B8%AA%E5%90%8D%E7%A7%B0%E4%B8%BACommand1%E7%9A%84%E5%91%BD%E4%BB%A4%E6%8C%89%E9%92%AE%EF%BC%8C%E7%84%B6%E5%90%8E%E7%BC%96%E5%86%99%E5%A6%82%E4%B8%8B%E7%A8%8B%E5%BA%8F%EF%BC%9AOption+Base+1Private+Sub+Command1.png)
[单项选择题] 在窗体上画一个名称为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条)