下列程序运行时输出的结果是 Private Sub Form_Click() Dim xx=Array(“天天向上”，“清华大学”，“天上人间”，“程序设计”)For i=LBound(a，1)to UBound(a，1) If Left(a(i)，1)=“天”Then Print a(i)；Next End Sub

A．天天向上

B．天天向上天上人间

C．出错信息

D．天天向上清华大学天上人间程序设计

测定水样中的（）时，均需先在酸性介质中进行预蒸馏分离。

A.挥发酚

B.氰化物

C.氟化物

D.砷化物