在窗体上放置一个命令按钮Command1 并编写下列单击事件的程序: Option Base 1 Private Sub Comma
窗体,单击,按钮
已帮助 人
在窗体上放置一个命令按钮Command1,并编写下列单击事件的程序: Option Base 1 Private Sub Command1_Click() Dim c As Integer , d As Integer d = 0 c = 6 X = Araay(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. 12 C. 16 D. 20
-
参考答案:B
【解析】程序首先使用Array函数为x数组变量赋值,然后利用For循环和If结构语句实现程序功能。程序执行过程如下: ①当i=1时,X(i)=2;d=d-c=-6;②当i=2时,X(i)=4;d=d-c=-12;③当i=3时,X(i)=6;d=d-c=-18;④当i=4时;X(i)=8;d=d+X(i)=-10;c=8;⑤i=5时,X(i)=10;d=d+X(i)=0;c=10;当i=6时,X(i)=12;d=d+X(i)=12;c=12.
