生活中的下列现象可以用分子的知识加以解释，其中错误的是（　　）

A．气体热胀冷缩主要是因为气体分子间的距离随温度的变化而改变

B．蔗糖溶解是因为蔗糖分子变小了

C．打开浓盐酸的试剂瓶，能闻到刺激性气味，是因为分子在不断地运动

D．液氧和氧气都能使带火星的木条复燃，是因为同种物质的分子化学性质相同

设有程序：
Option Base 1
Private Sub Command1 Click()
Dim arrl，Max as Integer
arrl=Array(12，435，76，24，78，54，866，43)
______ =arrl(1)
For i=1 To 8
If arrl(i)＞Max Then_______
Next i
Print“最大值是：”；Max
End Sub
以上程序的功能是：用Atray函数建立一个含有8个元素的数组，然后查找并输出该数组中元素的最大值。请填空。