对于化学反应3C₁₂+6NaOH=NaC<

（12）有下列Sub过程: Sub Sub(x As Single,y As Single) t=x x=t/y y=t Mody End Sub 在窗体上的命令按钮Commandl中，编写下列事件过程，执行该事件过程调用Sun过程，结果是（ ）。 Private Sub Commandl_Click() Dim a As Single Dim b As Single a=5 b=4 Sun a,b Print a；b End Sub A.1.25 1 B.5 4 C.4 5 D.1 1.25

A、Pa0/sub2/supsubno<60mHl.PaCO/sub2/supsubno>50mmlg

B、Pa0/sub2/supsubno<60mHgPaCO/sub2/supsubno<45mmg

C、Pa0/sub2/supsubno<60mmHgPaCO/sub2/supsubno>50mmH

D、Pa0/sub2/supsubno<60mHg、PaCO/sub2/supsubno<45mmHg

E、Pa0/sub2/supsubno<60mHg、PaC0/sub2supsubno45mmHg

（ 33 ）在窗体上有一个命令按钮 Commandl ，编写事件代码如下：

Private Sub Command1_Click()

Dim x As Integer, y As Integer

x = 12: y = 32

Call Proc(x, y)

Debug.Print x; y

End Sub

Public Sub Proc(n As Integer, ByVal m As Integer)

n = n Mod 10

m = m Mod 10

End Sub

打开窗体运行后，单击命令按钮，立即窗口上输出的结果是

A ） 2 32

B ） 12 3

C ） 2 2

D ） 12 32

以下程序的运行结果是( ) #define MAX 10 int a[MAX]，i; main() { printf("\n");sub1()；sub3(A) ,sub2()，sub3(A) ； } sub2() { int a[MAX]，i，max； max=5； for(i=0；i＜max；i++)a[i]＝i； } sub1() {for(i=0;i＜MAX；i++)a[i]＝i+i; } sub3(int a[]) { int i; for(i=0;i＜MAX，i++)printf("%d"，a[i])； printf("\n")； }

A．0 2 4 6 8 10 12 14 16 18 0 1 2 3 4

B．0 1 2 3 4 0 2 4 6 8 10 12 14 16 18

C．0 1 2 3 4 5 6 7 8 9 0 1 2 3 4

D．0 2 4 6 8 10 12 14 16 18 0 2 4 6 8 10 12 14 16 18

单击命令按钮时，下列程序代码的执行结果为 Public Sub proc1(n As Integer，Byva1 m As Integer) n=n Mod 10 m=m Mod 10 End Sub Private Sub Cmmand1_Click( ) Dim x As Integer，y As lngeger x=12：y=12 Call Proe1(x，y) Print x；y End Sub

A．12 2

B．2 12

C．2 2

D．12 12

以下程序的运行结果是

sub（int x,int y,int *z）

{*z=y-x;}

main（）

{ int a,b,c;

sub（10,5,&a）;

sub（7,a,&b）;

sub（a,b,&c）;

printf（"M,M,M＼n",a,b,c）;}

A．5,2,3

B．-5,-12,-7

C．-5,-12,-17

D．5,-2,-7

窗体Form1上有一个名称为Command1的命令按钮，以下对应窗体单击事件的事件过程是（ ）。

A.Private Sub Form1 Click（ ）

End Sub···

B.Private Sub Form1. Click（ ）

End Sub···

C.Private Sub Command1 click（ ）

End Sub···

D.Private Sub Command Click（ ）

End Sub···

设在工程中定义了下列类型： Type Stutype ino As Integer strname As String*20 Strsex As String*1 Smark As Single End Type在窗体上正确使用这个类型的是下列哪个操作 A. Sub Command1_Click() Dim student As Stutype With student .ino=12 .strname=smith .strsex=男 .smark=89 End With End Sub B. Sub Command1_Click() Dim student As Stutype With student .ino=12 .strname=＂smith＂ .strsex=＂男＂ .smark=89 End With End Sub C. Sub Command1_Click() Dim student As Stutype With Stutype .ino=12 .strname=＂smith＂ .strsex=＂男＂ .smark=89 End With End Sub D. Sub Command1_Click() Dim student As Stutype With student .ino=12 .strname=＂smith＂ .strsex=＂男＂ .smark=89 End student End Sub

以下程序的运行结果是( )。 #include＜iostream.h＞ void sub(int x，int y，int*z) {*Z=y-x；} void main() {int a，b，c； sub(10，5，&a)； sub(7，a，&b)； sub(a，b，&c)； cout＜＜a＜＜“，”＜＜b＜＜“，”＜＜c＜＜endl；}

A．5，2，3

B．-5，-12，-7

C．-5，-12，-17

D．5，-2，-7

设有如下程序： 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．2

B．6

C．10

D．12