下列情况不会造成空气污染的是（　　）

A．汽车尾气

B．石油化工厂排放的废气

C．煤燃烧产生的烟

D．水蒸发产生的水雾

阅读下列程序： Private Sub Form Click()Dim i As Integer， sum As IntegerFor i = 2 To 10 If i Mod 2 ＜＞ 0 Then Print i； Else sum = sum + i End IfNext iPrint sum End Sub 程序运行后，单击窗体，在窗体上的输出结果是

A．3 5 7 9 30

B．1 3 5 7 9

C．2 4 6 8 20

D．11 15 17 19 20