窗体上有一个命令桉钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是( )。 Private Sub Command1_click() Dim a a=Array(1,2,3,4,5) Fork=1 To 4 S=S+a(k)Next k Print S End Sub

A．10

B．14

C．15

D．120

据南方都市报08年3月6日报道，广州市流花湖近日出现蓝藻大面积暴发，此次蓝藻大面积暴发在流花湖50年历史中是首次出现。湖面远看仿佛一个小型草坪，蓝藻扩散速度非常快。据此回答1题。

1.引发此次流花湖蓝藻大面积暴发的原因可能是

A．前段时间持续高温，湖内大量食藻鱼类热死

B．流花湖水流速度慢，水体净化能力小

C．周边酒肆及城市排入大量的生活污水

D．大量工业污水排放引发湖水富营养化