以下程序段的输出结果为（ ）。 　　Dim 1，a(10)，p(3) 　　k=5 　　Fori=0 To 10 　　　　a(i)=i 　　Next i 　　For i=0 To 2 　　　　p(i)=a(i*(i+1)) 　　Next i 　　For i=0 To 2 　　　　k=k+p(i)*2 　　Next i 　　Frint k

A．ForLoop
B．Const
C．9abc
D．a # x

A．Private Sub List1_Click() Label1.Caption = List1.ListIndex End Sub
B．Private Sub List1_Click() Label1.Name=List1.Lis tIndex End Sub
C．Private Sub List1_Click() Label1.Name=List1.Text End Sub
D．Private Sub List1_Click() Label1.Caption =List1.Text End Sub