下列实验现象的描述不正确的是（　　）

A．红磷在空气中燃烧，产生大量白烟

B．木炭在氧气中燃烧，发出白光，生成二氧化碳气体

C．细铁丝在氧气中燃烧，火星四射，生成黑色固体

D．硫在空气中燃烧，发出淡蓝色火焰

在窗体上画1个命令按钮，其名称为Command1，然后编写如下事件过程：

Private Sub Command1_Click()

Dim arr(1 To 100)As Integer

For i=1 To 100

arr(i)=Int(Rnd*1000)

Next i

Max=arr(1)

Min=arr(1)

For i=1 To 100

If （） Then

Max=arr(i)

End If

If （） Then

Min=arr(i)

End If

Next i

Print "Max="；Max，"Min="；Min

End Sub

程序运行后，单击命令按钮，将产生100个1000以内的随机整数，加入数组arr中，然后查找并输出这100个数中的最大值Max和最小值Min，请填空。