设有如下程序： Option Base 0 Private Sub Form_Click( ) Dim a Dim i As Integer a=Array(1，2，3，4，5，6，7，8，9) For i=0 To 3 Print a(5-i) Next End Sub 程序运行后，单击窗体，则在窗体上显示的是

A．4 3 2 1

B．54 3 2

C．6 5 4 3

D．7 6 5 4

测量铅酸电池的电解液密度，可以判断蓄电池的（）。

A：放电程度

B：充电程度

C：活性物质的多少

D：极板间隙