减轻四肢骨折疼痛的有效措施（）。

A.口服止痛药

B.全身麻醉

C.神经阻滞

D.良好制动

E.吸氧

在窗体上画1个命令按钮，并编写如下事件过程：

　　Private Sub Command1_Click()

　　Dim a(3,3)

　　For m=1 To 3

　　For n=1 To 3

　　If n=m Or n=4-m Then

　　a(m,n)=0

　　End If

　　Print a(m,n);

　　Next n

　　Print

　　Next m

　　End Sub

运行程序，单击命令按钮，窗体上显示的内容为（）

A．2 0 0     0 4 0     0 0 6

B．2 0 4     0 4 0     4 0 6

C．2 3 0     3 4 0     0 0 6

D．2 0 0     0 4 5     0 5 6