在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1_Click() Dim c As Integer, d As Integer

admin2010-09-11  30

问题 在窗体上画一个名称为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的运算没有影响。
转载请注明原文地址:https://jikaoti.com/ti/0wg0FFFM
0

最新回复(0)