请回答下列问题：
（1）下列对象中，有 Caption属性的是_______________（单选，填字母：A. Command 1 / B.Text 1/C. List 1）。
（2）实现考场分配功能的VB程序如下，请在划线处填入合适的代码。
（3）程序中加框处代码有错，请改正。
Dim n AsInteger, y As String
Dim cla（1 To 20）As Integer, num（I To 20）As Integer
Dim room asInteger ＇存储考场号
Dim seat asInteger ＇存储座位号
Function fm（k As Integer） As String
＇返回整数k（l≤k≤99）对应的数字字符串，不足两位左侧补“0”，
代码略
End function
Private SubCommand 1_ Click( )
＇从Textl中读取入学年份存入变量y，从数据库中读取该人学年份的班级数据，
＇将班级个数存人变量n（1<n≤20），各班班号和人数分别存人数组cla和num，
＇各班班号均大于0，各班人数均未超过总人数的一半，
＇将数组cla和num按班级人数降序排列后，显示在List l中，代码略
End Sub
Private SubCommand 2_ Click( )
Dim i AsInteger, t As Integer, s As Integer
Dim choice AsInteger, m As Integer, f As Boolean
room=1：seat=1：choice=0
①
Do While f =True
If cla (1)<> choice Then m= 1 Else m = 2
choice = cla（m）
＇在列表框List2中显示准考证号、考场号、座位号
List 2. Addltemy fm（cla（m）） fm（num（m）） " " fm（room） " " fm（seat）
seat = seat 1
If seat > 30Then
room=1
seat = 1
End If
num（m）= num（m）-1
For i= ② To n-1 ＇维护班级降序序列（按未分配人数）
If num（i）< num（i 1）Then
t=num（i）：num（i）=num（i 1）：num（i 1）=t
s = cla（i）：cla（i）= cla（i 1）：cla（i 1）=s
Else
Exit For ＇ExitFor表示退出循环
End If
Next i
If ③ Then f = False
Loop
End Sub
16.编写VB程序，功能是根据A城和B城同一时间段内的温度数据，计算两城温差（A城温度B城温度）A城数据和B城数据分别为包含若于个记录的序列，其中，A城每个记录包含温度及其截止时间，B城每个记录包含温度及其持续时长。两城温差计算结果表示为若干个记录的序列，每个记录包含温差及其持续时长。持续时长是指同一温度（或温差）保持不变的最大时长。示例见下表。
时间
第1小时
第2小时
第3小时
第4小时
第5小时
第6小时
第7小时
A城温度
30
30
33
33
31
31
32
A城数据
温度
30
33
31
32
截止时间
2
4
6
7
B城温度
20
20
20
22
21
21
22
B城数据
温度
20
22
21
22
持续时长
3
1
2
1
计算结果
温差
10
13
11
10
持续时长
2
1
1
3
（时间单位：小时，温度单位：摄氏度）
表中，A城数据有4个记录，其中第1个记录为（温度30，截止时间2），第2个记录为（温度33，截止时间4），这表明从开始到第2小时的温度都是30，此后到第4小时的温度都是33。B城数据有4个记录，其中第3个记录为（温度21，持续时长2），这表明第5、第6这2个小时的温度都是21.两城温差计算结果的第4个记录为（温差10，持续时长3），这表明第5第6、第7这3个小时的温差都是10。
（1）若将示例中A城数据修改为3个记录，依次是（温度30，截止时间4）、（温度31，截止时间6）、（温度32，截止时间7），B城数据不变，则两城温差计算结果中第1个记录为（温差10，持续时长______________）（填数值）。
（2）实现上述功能的VB程序如下，请在划线处填入合适的代码。
Const m=1000 ＇温度数据和温差数据包含的记录数都少于1000
Dim na AsInteger, nb as integer ＇A、B城数据分别有na和nb个记录
Dim ha（m）As Integer ＇ha（i）存储A城第i个记录中的温度
Dim ta（m）As Integer ＇ta（i）存储A城第i个记录中的截止时间
Dim hb（m）As Integer ＇hb（i）存储B城第i个记录中的温度
Dim tb（m）As Integer ＇tb（i）存储B城第i个记录中的持续时长
Dim h（m）As Integer ＇h（i）存储计算结果第i个记录中的温差
Dim t（m）As Integer ＇t（i）存储计算结果第i个记录中的持续时长
Private SubCommand l__ Click（）
Dim i AsInteger，j As Integer
Dim p0 AsInteger，p1 As Integer，diff As Integer
Dim n AsInteger ＇两城温差数据的记录个数
＇读取两城数据，存入变量ma,nb及数组ha,ta,hb,tb中，代码略
For i=2 To nb
tb（i）= ① ＇将B城第i个记录中的持续时长转换为截止时间
Next i
i=1：j=1
n=0
p0=0
Do While i <na And i<= nb
diff ha（i）-hb（j）
pl = ta(i)
If ② Then i =i 1
If p1 >= tb(j) Then
pl = tb(i)
j=j 1
End if
If n = 0 Ordiff <> h(n) Then
n=n l
h(n) = diff
t(n) = pl- p0
Else
③
End If
p0=pl
Loop
＇输出两城温差数据，代码略
End Sub
第二部分 通用技术（共50分）
一、选择题（本大题共13小题，每小题2分，共26分。每小题列出的四个备选项中只有一个是符合题目要求的，不选、多选、错选均不得分）
1.如图所示购物车的尺寸中，不是从人机关系角度考虑的是（ ）
A. 350 B. 530 C. 650 D. 900
2.如图所示是阶梯式楼梯栏杆及其评价坐标图。根据坐标图，下列分析中不恰当的是（ ）
A.扶手尺寸合适，人机关系好
B.与直扶手相比，成本较低
C.方便助力和搁放重物，实用性好
D.支撑结构合理、扶手连接可靠，强度较高
3.小明要制作一个木质的篮球架模型，构思了下列设计方案，从稳定性角度考虑，其中合理的是（ ）
A.
B.
