以下程序的输出结果是D) 9 12
Option Base 1
Private Sub Command1_Click()
Dim s(10)，p(3)As Integer
k=5
For i=1 To 10
a(i)=i
Next i
For i=1 To 3
p(i)=a(i*i)
Next I
For i=1 To 3
k=k+ p(i)*2
Next i
Print k
End sub

A．33

B．28

C．35

D．37