电脑知识问答题4.doc

1在过程定义中用 _表示形参的传值。 A） Var B） ByRef C） ByVal D） ByValue 2若已经编写一个Sort子过程，在该工程中有多个窗体，为了方便调用Sort子程序，应该将子过程放在 _中。 A） 窗体模块 B） 类模块 C） 工程 D） 标准模块 3下面的子过程语句说明合法的是_。 A） Sub f1(ByVal n%() B） Sub f1(n%) As Integer C） Function f1%(f1%) D） Function f1(ByVal n%) 4要想从子过程调用后返回两个结果，下面子过程语句说明合法的是_。 A） Sub f(ByVal n%, ByVal m%) B） Sub f(n%, ByVal m%) C） Sub f(ByVal n%, m%) D） Sub f(n%, m%) 5下面程序运行的结果是 _。 Private Sub Command1_Click() Dim x%, y% x = 12 : y = 34 Call f(x,y) Print x,y End Sub Public Sub f1(n%,ByVal m%) n = n Mod 10 m = m 10 End Sub A） 2 34 B） 12 34 C） 2 3 D） 12 3 6在窗体上画一个名称为Command1的命令按钮，再画两个名称分别为Label1、Label2的标签，然后编写如下程序代码： Private X As Integer Private Sub Command1_Click() X = 5 : Y=3 Call proc(X,Y) Label1.Caption = X Label2.Caption = Y End Sub Private Sub proc(ByVal a As Integer, ByVal b As Integer) X = a * a Y = b + b End Sub 程序运行后，单击命令按钮，则两个标签中显示的内容分别是_。 A）5和3 B）25和3 C）25和6 D）5和6 7下面程序运行的结果是 _。 Dim a% , b% , c% Public Sub p1(x%, y%) Dim c% x = 2 * x : y = y + 2 : c = x + y End Sub Public Sub p2(x%, ByVal y%) Dim c% x = 2 * x : y = y + 2 : c = x + y End Sub Private Sub Command1_Click() a = 2 : b = 4 : c = 6 Call p1(a, B） Print a = ；a ；b = ；b ； c = ；c Call p2(a, B） Print a = ；a ；b = ；b ； c = ；c End sub A） a = 2 b = 4 c = 6 a = 4 b = 6 c = 10 B） a = 4 b = 6 c = 10 a = 8 b = 8 c = 16 C） a = 4 b = 6 c = 6 a = 8 b = 6 c = 6 D） a = 4 b = 6 c = 14 a = 8 b = 8 c = 6 8下面程序运行的结果是 _。 Public Sub Proc(a%() Static i% Do a(i) = a(i) + a(i+1) i = i + 1 Loop While i 2 End Sub Private Command1_click() Dim m% , i% , x%() For i = 0 to 4 : x(i) = i + 1 : Next i For i = 1 to 2 : Call Proc(x() : Next i For i = 0 to 4 : Print x(i) : Next i End Sub A） 3 4 7 5 6 B） 3 5 7 4 5 C） 2 3 4 4 5 D） 4 5 6 7 8 9.在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Private Sub Command1_Click() Static X As Integer Static Y As Integer Cls Y=1 Y=Y+5 X=5+X Print X,Y End Sub 程序运行时，三次单击命令按钮Command1后，窗体上显示的结果为_。 A）15 16 B）15 6 C）15 15 D）5 6 10. 下列叙述中正确的是_。 A）在窗体的Form_Load事件过程中定义的变量是全局变量 B）局部变量的作用域可以超出所定义的过程 C）在某个Sub过程中定义的局部变量可以与其它事件过程中定义的局部变量同名，但其作用域只限于该过程 D）在调用过程时，所有局部变量被系统初始化为0或空字符串 11 .以下关于变量作用域的叙述中，正确的是_。 A）窗体中凡被声明为Private的变量只能在某个指定的过程中使用 B）全局变量必须在标准模块中声明 C）模块级变量只能用Private关键字声明 D）Static类型变量的作用域是它所在的窗体或模块文件 12. 单击一次命令按钮之后，下列程序代码的执行结果为_。 Private Sub Command1_Click( ) S=P(1)+P(2)+P(3)+P(4) Print S; End Sub Private Function P(N As Integer) Static SUM For I= 1 TO N Sum=sum+1 Next I P=SUM End Function A）135 B）115 C）35 D）20 13. 可以在窗体模块的通用声明段中声明_。 A）全局变量 B）全局常量 C）全局数组 D）全局用户自定义类型 14. 设有如下通用过程： Public Function f(x As Integer) Dim y As Integer x=20 y=2 f=x*y End Function 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Static x As Integer x=10 y=5 y=f(x) Print x;y End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是_。 A）10 5 B）20 5 C）20 40 D）10 40 15. 单击命令按钮时，下列程序代码的执行结果为_。 Dim a As integer,b As Integer,c As Integer Private Sub Command1_Click( ) a=5:b=8:c=9 Call Proc1(a,B） Printa=;a;b=;b;c=;c Call Proc2(a,B） Printa=;a;b=;b;c=;c End Sub Public Sub Proc1(x As Integer,y As Integer) Dim c As Integer x=2*x:y=y+2:c=x+y End Sub Public sub proc2(x As Integer,Byval y as Integer) Dim c As Integer x=2*x:y=y+2:c=x+y End sub A）a=20 b=10 c=9 a=10 b=10 c=9 B）a=10 b=10 c=9 a=20 b=10 c=9 C）a=10 b=10 c=9 a=10 b=10 c=9 D）a=20 b=20 c=9 a=20 b=10 c=9 16. 单击命令按钮时，下列程序代码的执行结果为_。 Public Sub Procl(n As Integer,ByVal m As Integer) n=n Mod 10 m=m10 End Sub Private Sub Command1_Click( ) Dim x As Integer,y As Integer x=23:y=65 Call Procl(x,y) Print x;y End Sub A）3 65 B）23 65 C）3 60 D）0 65 17. 在窗体上画一个名称为Command1命令按钮和三个名称分别为Label1、Label2、Label3的标签，然后编写如下代码： Private x As Integer Private Sub Command1_Click() Static y As Integer Dim z As Integer n = 10 z = n + z y = y + z x = x + z Label1.Caption = x Label2.Caption = y Label3.Caption = z End Sub 运行程序，连续三次单击命令按钮后，则三个标签中显示的内容分别是_。 A）10 10 10 B）30 30 30 C）30 30 10 D）10 30 30 18. 以下关于函数过程的叙述中，正确的是_。 A）函数过程形参的类型与函数返回值的类型没有关系 B）在函数过程中，通过函数名可以返回多个值 C）当数组作为函数过程的参数时，既能以传值方式传递，也能以传址方式传递 D）如果不指明函数过程参数的类型，则该参数没有数据类型 19. 单击窗体时，下列程序代码的执行结果为_。 Private Sub Form_Click() Test 2 End Sub Private Sub Test(x As Integer) x=x*2+1 If x6 Then Call Test(x) End If x=x*2+1 Print x; End Sub A）5 11 B）23 47