男，62岁，腰L3椎体肿瘤被当作"腰椎间盘突出症"予局部物理疗法加消炎镇痛药治疗3个月，为避免误诊，最简便的检查是（）A、CTB、MRIC、X线平片检查D、脊髓造影E、核素骨扫描

阅读下列程序。

Option Base 1

Private Sub Form. Click()

Dim x(3,3)

For j=l to 3

For k=l to 3

If j=k then x(j,k)=l

If j＜＞k then x(j,k)=k

Next k

Next j

Call fun(x())

End Sub

Private Sub fun(x() )

For j=1 to 3

For k=1 to 3

Print x(j,k);

Next k

Next j

End Sub

运行程序时，输出结果为【 】

写出程序运行的结果

Public class Base

Public virtual string Hello() {return “Base”;}

Public class Sub:Base

Public override string Hello() {return “Sub”;}

1. Base b = new Base(); b.Hello;

2. Sub s = new Sub(); s.Hello;

3. Base b = new Sub (); b.Hello;

4. Sub s = new Base(); s.Hello;

在下面的程序中，要求循环体执行四次，请填空。

Private Sub Command l-Click ()

x=l

Do While【 】

x=x+2

Loop

End Sub

在窗体中添加一个命令按钮，编写如下程序： Private Sub Sub1(p，m，n) p=p+1：m=m+1：n=n+1 Print "sub1："；p；m；n End Sub Private Sub Command1_Click() a1=1：b=2：c1=3 Call Sub1(a，b1+3，c1) Print"Main："；a1；b1；c1 End Sub 程序运行后，输出结果为

A．Sub： 2 6 4 Main： 2 6 4

B．Sub： 2 6 4 Main： 2 6 4

C．Sub： 2 6 4 Main： 1 2 3

D．Sub： 2 6 4 Main： 2 2 3

A、腰4椎体下1/3和腰4-5椎体间隙

B、腰4椎体上1/3和腰4-5椎体间隙

C、腰4椎体下1/3和腰3-4椎体间隙

D、腰4椎体上1/3和腰3-4椎体间隙

在窗体中添加一个命令按钮，编写如下程序： Private Sub Test(p，m，n) p=p+1：m=m+1：n=n+1 Print "Sub: ";p；m；n End Sub Private Sub Command1.Click() a1=1：b=2：c1=3 Call Test((a，b1+3，(c1)) Print "Main："；a1；b1；c1 End Sub 程序运行后，输出结果为

A．Sub： 2 6 4 Main： 2 6 4

B．Sub： 2 6 4 Main： 2 6 4

C．Sub： 2 6 4 Main： 1 2 3

D．Sub： 2 6 4 Main： 2 2 3

在窗体中添加一个命令按钮,编写如下程序:

Private Sub Sub1(p,m,n)

p=p+1:m=m+1:n=n+1

Print "sub1:";p;m;n

End Sub

Private Sub Command1_Click()

a1=1:b=2:c1=3

Call Sub1(a,b1+3,c1)

Print"Main:";a1;b1;c1

End Sub

程序运行后,输出结果为

A．Sub: 2 6 4 Main: 2 6 4

B．Sub: 2 6 4 Main: 2 6 4

C．Sub: 2 6 4 Main: 1 2 3

D．Sub: 2 6 4 Main: 2 2 3