以下各项，哪一项在肱骨干骨折时较少出现：

A．常伴有桡神经损伤

B．断端间易有软组织嵌入

C．易出现分离移位

D．中下段骨折有损伤肱动脉之可能

E．中上1/3骨折常可不愈合

在窗体上画一个命令按钮Command1，然后编写如下程序：
Private Sub Command1_click()
Dim arr() As Integer
ReDim arr(3)
For i=0 To 3
arr(i)=i
Next i
x=InputBox("请输入一个数字：")
If Val(x)＞4 Then
ReDim arr(4)
an(4)=x
End If
Me.Print(an(4)-arr(3))
End Sub
程序运行后，单击命令按钮，在输入对话框中输入12，输出结果为 【10】 。