生命表中ex表示（）A、死亡率B、存活分数C、平均寿命D、死亡数

A、Public Sub Sum(x ; y)

B、Public Sub Sum(ByVal x, ByVal y)

C、Public Sub Sum(x As Integer,y As Integer)

D、Public Sub Sum(x%, y%)

在窗体中添加一个名称为Cmd的命令按钮，然后编写如下程序： Public x As integer Private Sub Cmd_Click() x=10 Call add1 Call add2 MsgBox x End Sub Private Sub add1 ( ) x=x+20 End Sub Private Sub add2 ( ) Dim x As integer x=x+40 End Snb 窗体打开运行后，单击命令按钮，则消息框的输出结果为( )。

A．10

B．60

C．30

D．70

有以下程序：

int sub(int n) { return(n/10+n%10); }

main()

{ int x, y;

scanf("% d", &x);

y=sub(sub(sub(x)));

printf("% d\n", y);

}

若运行时输入：1234＜回车＞，程序的输出结果是【 】。

若有以下变量和函数说明： #include＜iostream.h＞ charCh='*'； void sub(int x，int y,char ch，double*Z) { switch(ch) { case'+':*Z=x+y;break； case'-':*Z=x-y;break： case'*':*Z=x*y;break； case'/':*z=x/y;break： } } 以下合法的函数调用语句是( )。

A．sub(10，20，Ch，y)；

B．sub(1.2+3，2*2，'+'，&Z)；

C．sub(sub(1，2，'+'，&y)，sub(3，4'+'，&x)，'-'，&y)；

D．sub(a，b，&x,ch)；

执行下面程序，第一行输出结果是【 】，第二行输出结果是47。

Option Explicit

Private Sub Form_Click( )

Dim A As Integer

A=2

Call Sub1 (A) End Sub

Private Sub1 (x As Integer)

x=x*2+1

If x＜10 Then

Call Sub1 (x)

End If

x=x*2+1

Print x

End Sub

在窗体中添加一个名称为Commandl的命令按钮，然后编写如下程序：Public X As Integer Private Sub Commandl Click（ ）x＝10 Call slCall s2MsgBox x End Sub Private Sub sl（ ）x＝x+20 End Sub Private Sub s2（ ）Dim x As Integer x=x+20End Sub窗体打开运行后，单击命令按钮，则消息框的输出结果为（ ）。

A.10

B.30

C.40

D.50

有如下Sub过程：

Sub ind(a As Integer)

Static x As Integer

x= x + a

Print x：

End Sub

以下是调用它的事件过程，程序运行后，单击命令按纽Command1三次，输出结果为【 】。

Private Sub Command1_Click()

Ind 2

End Sub

下面各被调用函数首部书写正确的是( )

A．void sub(float x；float y)；

B．void sub(float x，y)

C．void sub(float x，float y)

D．void sub(float x，float y)；

在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序： Public x As Integer Private Sub Command1_Click() x=10 Call s1 Call s2 MSgBox x End Sub Private Sub s1() x=x＋20 End Sub Private Sub s2() Dim x As Integer x=X＋20 End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果为______。

A．10

B．30

C．40

D．50

有如下程序： Private Sub Command1_Click() Dim a As Single Dim b As Single a=5:b=4 Call Sub1(a,b) End Sub Sub Sub1(x As Single，y As Single) t=X X=t\Y Y=t Mod y End Sub 在调用运行上述程序后，a和b的值分别为

A．0 0

B． 1 1

C．2 2

D．1 2

有如下一个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．12

B．24

C．36

D．48

假定有以下两个过程： Private Sub PPP(a As Single, b As Single) a=a+b Print a, b b=a+b Print a, b End Sub Private Sub Form_Activate0 x=18 Call PPP((x), (x)) Print x End Sub 则下列说法中不正确的是( )。

A．形参是a和b，两个实参(x)和(x)允许重名

B．形参是a和b，实参(x)表示传值调用

C．形参是a和b，实参(x)表示是非传址调用

D．形参是a和b，两个实参(x)和(x)不允许重名

在窗体中添加一个名称为Commandl的命令按钮，然后编写如下程序： Public x As Integer Private Sub Commandl_click() x＝10 Call s 1 Call s 2 MsgBOx x End Sub Pfivate Sub s1() x＝x+20 End Sub Private Sub

A．10

B．30

C．40

D．50