试题与答案

在窗体上放置一个命令按钮Command1,并编写下列单击事件的程序: Option

题型:单项选择题

题目:

在窗体上放置一个命令按钮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) 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。

试题推荐
题型:填空题

野炊过程实际上是运用化学知识分析、解决问题的过程,因为该项活动过程中涉及许多化学知识的运用。某次野炊活动中,同学们携带了铁锅、牛肉、面条、西红柿、食用油、食盐、味精、食醋、去污粉(有效成份为碳酸钠)等物品。

(1)携带过程中,不慎将装食盐、去污粉的瓶子混淆了。若要将它们区分开来,适宜选用_______(填所携带的物品名称)。

(2)在“灶”上悬挂野炊锅时,小明生火后小心调节野炊锅到合适的高度。这样做的原因可能是________。

A.使用焰心加热 B.使用内焰加热 C.使用外焰加热

(3)烹煮牛肉西红柿汤时,为了解汤的咸味是否适宜,小春同学取锅中少量汤品尝。取少量汤进行品尝就可知道整锅汤咸味如何,是因为溶液具有______(填一条性质)。

(4)野炊结束时,小辉用干布抹去铁锅表面的水珠。这样做的目的是_______。

查看答案
微信公众账号搜索答案