女性，26岁。头晕，乏力3年，维生素B12，叶酸治疗3个月，平时月经量较多。查血红蛋白75g/L，红细胞3.1×1012/L，白细胞4.5×109/L，血小板20×109/L，网织红细胞1.5%，尿胆原（-），大便隐血（-）。此患者治疗宜选择（）
设有如下程序： Private Sub search(a()As Variant，ByVal key As Variant，index%) Dim I％ For I = Lbound(a)To Ubound(A)If key=a(I)Then index=I Exit Sub End If Next I index=-1 End Sub Private Sub Form_Load() Show Dim b()As Variant Dim n As Integer b=Array(21，64，92，15，72，38，45，72) Call search(b， 45， n) Print n End Sub 程序运行后，输出的结果是A．2B．6C．10D．12
点击查看答案
有如下一个Sub过程： Sub mlt(ParamArray numbers()) n=1 For Each x In numbers n=n*x Next x Print n End Sub 在一个事件过程中如下调用该Sub过程： Private Sub Command1_Click() Dim a As Integer Dim b As Integer Dim c As Integer Dim d As Integer a=1 b=2 c=3 d=4 mlt a,b,c,d End Sub 该程序的运行结果为( )。A．12B．24C．36D．48
下列Sub 过程中描述错误的是______。A．Sub 过程只能在窗体模块中定义B．Goto 语句不能用于Sub 过程C．Sub 过程只能在窗体模块中定义D．Sub 过程中不能嵌套定义Sub 过程
A、PH7.38，PaO250mmHg，PaCO240mmHgB、PH7.30，PaO250mmHg，PaCO280mmHgC、PH7.40，PaO260mmHg，PaCO265mmHgD、PH7.35，PaO280mmHg，PaCO220mmHgE、PH7.25，PaO270mmHg，PaCO220mmHg血气分析结果符合代偿性代谢性酸中毒（ ）
以下程序的运行结果是（ ）。 #include(iostream．h> voidsub(intx，inty，int*z) {*z=y-x；} voidmain（ ） {inta，b，c； sub(10，5，＆a)； sub(7，a，＆b)； sub(a，b，＆c)； cout((a<<"，"<<b<<"，"<<C<<endl；}A.5，2，3B.-5，-12，-7C.-5，-12，-17D.5，-2，-7
下列程序的执行结果为 Private Sub Comrnandl_Click( ) Dim p As Integer, q As Integer p=12：q=20 Call Value(p, q) Print p; q End Sub Private Sub Value(ByVal m As Integer, ByVal n As Integer) m=m * 2: n=n - 5 Print m; n End SubA．20 12 20 15B．12 20 12 25C．24 15 12 20D．24 12 12 15
单击命名按钮时，下列程序代码的执行结果为 Public Sub procl ( n As Integer， Byval m As Integer) n=n Mod 10 m=m Mod 10 End Sub Private Sub Cmmand1 Click() Dim x As Integer， y As Integer x=12：y=12 Call Procl (x， y) Print x；y End SubA．12 2B．2 12C．2 2D．12 12
