5过程.docx
- 文档编号:13802943
- 上传时间:2023-06-17
- 格式:DOCX
- 页数:25
- 大小:23.31KB
5过程.docx
《5过程.docx》由会员分享,可在线阅读,更多相关《5过程.docx(25页珍藏版)》请在冰点文库上搜索。
5过程
过 程
一、单选题
1.在过程定义中用________表示形参的传值。
A)Var B)ByRef C)ByVal D)ByValue
2.若已经编写一个Sort子过程,在该工程中有多个窗体,为了方便调用Sort子程序,应该将子过程放在________中。
A)窗体模块 B)类模块 C)工程 D)标准模块
3.下面的子过程语句说明合法的是________。
A)Subf1(ByValn%()) B)Subf1(n%)AsInteger
C)Functionf1%(f1%) D)Functionf1(ByValn%)
4.要想从子过程调用后返回两个结果,下面子过程语句说明合法的是________。
A)Subf(ByValn%,ByValm%) B)Subf(n%,ByValm%)
C)Subf(ByValn%,m%) D)Subf(n%,m%)
5.下面程序运行的结果是________。
PrivateSubCommand1_Click() PublicSubf1(n%,ByValm%)
Dimx%,y% n=nMod10
x=12:
y=34 m=m\10
Callf(x,y) EndSub
Printx,y
EndSub
A) 2 34 B)12 34 C) 2 3 D)12 3
6.在窗体上画一个名称为Command1的命令按钮,再画两个名称分别为Label1、Label2的标签,然后编写如下程序代码:
PrivateXAsInteger
PrivateSubCommand1_Click()
X=5:
Y=3
Callproc(X,Y)
Label1.Caption=X
Label2.Caption=Y
EndSub
PrivateSubproc(ByValaAsInteger,ByValbAsInteger)
X=a*a
Y=b+b
EndSub
程序运行后,单击命令按钮,则两个标签中显示的内容分别是______。
A)5和3 B)25和3 C)25和6 D)5和6
7.下面程序运行的结果是________。
Dima%,b%,c%
PublicSubp1(x%,y%)
Dimc%
x=2*x:
y=y+2:
c=x+y
EndSub
PublicSubp2(x%,ByValy%)
Dimc%
x=2*x:
y=y+2:
c=x+y
EndSub
PrivateSubCommand1_Click()
a=2:
b=4:
c=6
Callp1(a,B)
Print"a=";a;"b=";b;"c=";c
Callp2(a,B)
Print"a=";a;"b=";b;"c=";c
Endsub
A) a=2 b=4 c=6 B)a=4 b=6 c=10
a=4 b=6 c=10 a=8 b=8 c=16
C) a=4 b=6 c=6 D)a=4 b=6 c=14
a=8 b=6 c=6 a=8 b=8 c=6
8.下面程序运行的结果是________。
PublicSubProc(a%())
Statici%
Do
a(i)=a(i)+a(i+1)
i=i+1
Loop Whilei<2
EndSub
PrivateCommand1_click()
Dimm%,i%,x%()
Fori=0to4 :
x(i)=i+1 :
Nexti
Fori=1to2 :
CallProc(x()) :
Nexti
Fori=0to4 :
Printx(i) :
Nexti
EndSub
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的命令按钮,然后编写如下程序:
PrivateSubCommand1_Click()
StaticXAsInteger
StaticYAsInteger
Cls
Y=1
Y=Y+5
X=5+X
PrintX,Y
EndSub
程序运行时,三次单击命令按钮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.单击一次命令按钮之后,下列程序代码的执行结果为______。
PrivateSubCommand1_Click()
S=P
(1)+P
(2)+P(3)+P(4)
PrintS;
EndSub
PrivateFunctionP(NAsInteger)
StaticSUM
ForI=1TON
Sum=sum+1
NextI
P=SUM
EndFunction
A)135 B)115 C)35 D)20
13.可以在窗体模块的通用声明段中声明______。
A)全局变量 B)全局常量
C)全局数组 D)全局用户自定义类型
14.设有如下通用过程:
PublicFunctionf(xAsInteger)
DimyAsInteger
x=20
y=2
f=x*y
EndFunction
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
PrivateSubCommand1_Click()
StaticxAsInteger
x=10
y=5
y=f(x)
Printx;y
EndSub
程序运行后,如果单击命令按钮,则在窗体上显示的内容是______。
A)10 5 B)20 5 C)20 40 D)10 40
15.单击命令按钮时,下列程序代码的执行结果为______。
DimaAsinteger,bAsInteger,cAsInteger
PrivateSubCommand1_Click()
a=5:
b=8:
c=9
CallProc1(a,B)
Print"a=";a;"b=";b;"c=";c
CallProc2(a,B)
Print"a=";a;"b=";b;"c=";c
EndSub
PublicSubProc1(xAsInteger,yAsInteger)
DimcAsInteger
x=2*x:
y=y+2:
c=x+y
EndSub
Publicsubproc2(xAsInteger,ByvalyasInteger)
DimcAsInteger
x=2*x:
y=y+2:
c=x+y
Endsub
A)a=20 b=10 c=9 B)a=10 b=10 c=9
a=10 b=10 c=9 a=20 b=10 c=9
C)a=10 b=10 c=9 D)a=20 b=20 c=9
a=10 b=10 c=9 a=20 b=10 c=9
16.单击命令按钮时,下列程序代码的执行结果为______。
PublicSubProcl(nAsInteger,ByValmAsInteger)
n=nMod10
m=m\10
EndSub
PrivateSubCommand1_Click()
DimxAsInteger,yAsInteger
x=23:
y=65
CallProcl(x,y)
Printx;y
EndSub
A)3 65 B)23 65 C)3 60 D)0 65
17.在窗体上画一个名称为Command1命令按钮和三个名称分别为Label1、Label2、Label3的标签,然后编写如下代码:
PrivatexAsInteger
PrivateSubCommand1_Click()
StaticyAsInteger
DimzAsInteger
n=10
z=n+z
y=y+z
x=x+z
Label1.Caption=x
Label2.Caption=y
Label3.Caption=z
EndSub
运行程序,连续三次单击命令按钮后,则三个标签中显示的内容分别是______。
A)10 10 10 B)30 30 30 C)30 30 10 D)10 30 30
18.以下关于函数过程的叙述中,正确的是______。
A)函数过程形参的类型与函数返回值的类型没有关系
B)在函数过程中,通过函数名可以返回多个值
C)当数组作为函数过程的参数时,既能以传值方式传递,也能以传址方式传递
D)如果不指明函数过程参数的类型,则该参数没有数据类型
19.单击窗体时,下列程序代码的执行结果为______。
PrivateSubForm_Click()
Test2
EndSub
PrivateSubTest(xAsInteger)
x=x*2+1
Ifx<6Then
CallTest(x)
EndIf
x=x*2+1
Printx;
EndSub
A)5 11 B)23 47 C)10 22 D)23 23
20.假定已定义了一个过程SubAdd(aAsSingle,bAsSingle),则正确的调用语句是______。
A)Add12,12 B)Call(2*x,Sin(1.57))
C)CallAddx,y D)CallAdd(12,12,x)
21.一个工程中包含两个名称分别为Form1、Form2的窗体,一个名称为Md1Func的标准模块。
假定在Form1、Form2和Md1Func中分别建立了自定义过程,其定义格式为:
Form1中定义的过程:
PrivateSubfrmFunction1()
……
EndSub
Form2中定义的过程:
PrivateSubfrmFunction2()
……
EndSub
mdlFunc中定义的过程:
PublicSubmd1Function()
……
EndSub
在调用上述过程的程序中,如果不指明窗体或模块的名称,则以下叙述中正确的是______。
A)上述三个过程都可以在工程中的任何窗体或模块中被调用
B)frmFunction2和mdlFunction过程能够在工程中各个窗体或模块中被调用
C)上述三个过程都只能在各自被定义的模块中调用
D)只有Md1Function过程能够被工程中各个窗体或模块调用
22.在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:
FunctionFunc(ByValxAsInteger,yAsInteger)
y=y*x
Ify>0Then
Func=x
Else
Func=y
EndIf
EndFunction
PrivateSubCommand1_Click()
DimaAsInteger,bAsInteger
a=3
b=4
c=Func(a,B)
Printa;b;c
EndSub
程序运行后,单击命令按钮,其输出结果为______。
A)3412 B)343 C)3123 D)31212
23.以下叙述中错误的是______。
A)一个工程中可以包含多个窗体文件
B)在一个窗体文件中用Public定义的通用过程不能被其他窗体调用
C)窗体和标准模块需要分别保存为不同类型的磁盘文件
D)用Dim定义的窗体层变量只能在该窗体中使用
24.下面的过程定义语句中合法的是______。
A)SubProcl(ByValn()) B)SubProcl(n)AsInteger
C)FunctionProcl(Procl) D)FunctionProcl(ByValn)
25.设有如下通用过程:
PublicFunctionFun(xStrAsString)AsString
DimtStrAsString,strLAsInteger
tStr=""
strL=Len(xStr)
i=1
DoWhilei<=strL/2
tStr=tStr&Mid(xStr,i,1)&Mid(xStr,strL-i+1,1)
i=i+1
Loop
Fun=tStr
EndFunction
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下的事件过程:
PrivateSubCommand1_Click()
DimS1AsString
S1="abcdef"
Text1.Text=UCase(Fun(S1))
EndSub
程序运行后,单击命令按钮,则Text1中显示的是______。
A)ABCDEF B)abcdef C)AFBECD D)DEFABC
26.在窗体上画1个命令按钮,编写代码如下。
程序运行后,单击命令按钮,输出结果为______。
PrivateSubCommand1_Click()
Dima(10)AsInteger
DimxAsInteger
Fori=1To10
a(i)=8+i
Next
x=2
Printa(f(x)+x)
EndSub
Functionf(xAsInteger)
x=x+3
f=x
EndFunction
A)12 B)15 C)17 D)18
27.在过程中定义的变量,若希望在离开该过程后,还能保存过程中局部变量的值,则使用______关键字在过程中定义局部变量。
A)Dim B)Private C)Public D)Static
28.以下正确的描述是:
在VisualBasic应用程序中______。
A)过程的定义可以嵌套,但过程的调用不能嵌套。
B)过程的定义不可以嵌套,但过程的调用可以嵌套。
C)过程的定义和过程的调用均可以嵌套。
D)过程的定义和过程的调用均不能嵌套。
29.有子过程语句说明:
SubfSum(sum%,ByValm%,ByValn%),
且在事件过程中有如下变量说明:
Dima%,b%,c!
则下列调用语句中正确的是______。
A)fsuma,a,b B)fsum2,3,4 C)fsuma+b,a,b D)Callfsum(c,a,B)
30.有如下程序,其运行的结果是______。
PublicFunctionf(m%,n%)
DoWhilem<>n
Dowhilem>n:
m=m-n:
Loop
Dowhilem n=n-m: Loop Loop F=m EndFunction PrivateSubCommand1_Click() Printf(24,18) EndSub A)0 B)2 C)3 D)6 31.假定有如下的Sub过程: SubS(xAsSingle,yAsSingle) t=x x=t/y y=tMody EndSub 在窗体上画一个命令按钮,然后编写如下事件过程: PrivateSubCommandl_Click() DimaAsSingle DimbAsSingle a=5 b=4 Sa,b Printa,b EndSub 程序运行后,单击命令按钮,输出结果为______。 A)5 4 B)1 1 C)1.25 4 D)1.25 1 32.假定有以下两个过程: SubS1(ByValxAsInteger,ByBalyAsInteger) DimtAsInteger t=x: x=y: y=t EndSub SubS2(xAsInteger,yAsInteger) DimtAsInteger t=x: x=y: y=t EndSub 则以下说法中正确的是______。 A)用子过程S1可以实现交换两个变量的值的操作,S2不能实现 B)用子过程S2可以实现交换两个变量的值的操作,S1不能实现 C)用子过程S1和S2都可以实现交换两个变量的值的操作 D)用子过程S1和S2都不能实现交换两个变量的值的操作 33.阅读程序: SubsubP(b()AsInteger) Fori=1To4 b(i)=2*i Nexti EndSub PrivateSubCommandl_Click() Dima(1To4)AsInteger a (1)=5: a (2)=6: a(3)=7: a(4)=8 subPa() Fori=1To4 Printa(i); Nexti EndSub 运行上面的程序,单击命令按钮,输出结果为_____
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 5 过 程.docx