Ⅱ型肾小管酸中毒反映（）

A.远端、近端肾小管均有障碍

B.代谢性酸中毒

C.远端肾小管功能缺陷

D.近端肾小管功能缺陷

E.代谢性碱中毒

下面程序段，运行后的结果是( )。
Private Sub Command1_Click()
Dim b%(1 To 4),i%,t#
For i=1 To 4
b(i)=i
Next
t=Tof(b))
Print“t=”：t，
End Sub
Function Tof(a() As Integer)
Dim t%，i%
t=1
For i=2 To UBound(a)
t=t a(i)
Next
Tof=t
End Function

A) t=18
B) t=24
C) t=30
D) t=32