已知某元素的阳离子（R²⁺）的质子数后，仍然不能确定的是　 [ ]

A． 核外电子数

B． 电子层数

C． 化合价

D． 中子数　

在窗体上有一个命令按钮Command1，编写事件代码如下。
Private Sub Command1_Click()
Dim a(10)，p(3) As Integer
k=5
For i=1 To 10
a(i)=i*i
Next i
For i=1 To 3
D(i)=a(i*i)
Next i
For i=1 To 3
k=k+p(i)*2
Next i
MsgBox k
end Sub
打开窗体运行后，单击命令按钮，消息框中输出的结果是______。