在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序：
Private Sub S(By Val P As Integer)
P=P*2
End Sub
Private Sub Command1_Click()
Dim i As Integer
i=3
Call s(i)
If i＞4 Then i=i^2
MsgBox i
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果为______。

关于老年骨质疏松病患者骨骼的变化，哪项叙述是不正确的（）

A.骨矿含量减低

B.骨皮质变薄

C.骨小梁数量减少

D.骨小梁数量增加

E.骨基质减少