在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command 1 Click() d=0:c=10:x=Array(10,12,2 1,32,24

admin2020-04-18  27

问题 在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序:
    Option Base 1
    Private Sub Command 1 Click()
          d=0:c=10:x=Array(10,12,2 1,32,24)
          For i=1 To 5
               Ifx(i)>c Then
                    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://jikaoti.com/ti/K9x0FFFM
0

最新回复(0)