超星 - 过程单元测验 - 查题吧

单选题

以下关于函数过程的叙述中，正确的是（）。

A. 在定义函数过程中使用的参数，称为实参
B. 函数过程形参的类型与函数返回值的类型没有关系
C. 如果不指明函数过程参数的类型，则该参数没有数据类型
D. 在函数过程中，通过函数名可以返回多个值

单选题

在过程调用中，参数的传递可以分为（）和按地址传递两种方式。

A. 指名传递
B. 按参数传递
C. 按值传递
D. 按位置传递

单选题

下列子过程的定义语句中，正确的是（）。

A. Dim mySub as Sub(n%)
B. Sub mySub%(ByVal n As Integer)
C. Sub mySub(ByRef n%) As Integer
D. Sub mySub(ByVal n%)

单选题

若已经编写一个Sort子过程，在该工程中有多个窗体，为了方便调用Sort子程序，应该将子过程放在（）中

A. 工程
B. 标准模块
C. 窗体模块
D. 类模块

单选题

单击命令按钮时，下列程序代码的运行结果为（）。Public Sub Procl(ByVal n As Integer, m As Integer)n = n Mod 10m = m \ 10End SubPrivate Sub Command1_Click()Dim x As Integer, y As Integerx = 23y = 65Call Procl(x, y)Print x; yEnd Sub

A. 3 60
B. 0 65
C. 3 65
D. 23 6

单选题

在窗体上添加一个命令按钮Command1，编写代码如下：Function f(x As Integer)x = x + 3f = xEnd FunctionPrivate Sub Command1_Click()Dim a(10) As IntegerDim x As IntegerFor i = 1 To 10a(i) = 8 + iNextx = 2Print a(f(x) + x)End Sub程序运行后，单击命令按钮，显示结果为（）。

A. 15
B. 17
C. 12
D. 18

单选题

设有如下程序代码:Private Function Fc(ByVal n As Integer) As IntegerFc = n * Fj(5)End FunctionPrivate Function Fj(ByVal n As Integer) As IntegerFj = n + 3End FunctionPrivate Sub Command1_Click()Dim a As Integera = 3Form1.Print Fc(a)End Sub程序时单击命令按钮，在窗体上输出的结果为（）。

A. 24
B. 5
C. 3
D. 15

单选题

在窗体上添加一个命令按钮Command1，然后编写如下程序：Function Func(ByVal x As Integer, y As Integer)y = y * xIf y > 0 ThenFunc = xElseFunc = yEnd IfEnd FunctionPrivate Sub Command1_Click()Dim a As Integer, b As Integera = 3b = 4c = Func(a, b)Print a; b; cEnd Sub程序运行后，单击命令按钮，其显示结果为（）。

A. 3 4 3
B. 3 12 3
C. 3 4 12
D. 3 12 12

单选题

单击窗体时，下列程序代码的运行结果为（）。Private Sub Test(x As Integer)x = x * 2 + 1If x < 6 ThenCall Test(x)End Ifx = x * 2 + 1Print "x="; xEnd SubPrivate Sub Form_Click()Test 2End Sub

A. 23 47
B. 23 23
C. 10 22
D. 5 11

1