第八章VB过程Word文档下载推荐.docx
- 文档编号:20017541
- 上传时间:2023-01-15
- 格式:DOCX
- 页数:26
- 大小:23.32KB
第八章VB过程Word文档下载推荐.docx
《第八章VB过程Word文档下载推荐.docx》由会员分享,可在线阅读,更多相关《第八章VB过程Word文档下载推荐.docx(26页珍藏版)》请在冰豆网上搜索。
Printa
EndSub
运行程序后,如果单击命令按钮,则显示一个输入对话框,在该对话框中输入一个整数,并用这个整数作为实参调用函数过程f1。
在f1中判断所输入的整数是否是奇数,如果是奇数,过程f1返回1,否则返回0。
能够正确实现上述功能的代码是:
A、Functionf1(ByRefbAsInteger)B、Functionf1(ByRefbAsInteger)
IfbMod2=0ThenIfbMod2=0Then
return0f1=0
ElseElse
return1f1=1
EndIfEndIf
EndFunctionEndFunction
C、Functionf1(ByRefbAsInteger)D、f1(ByRefbAsInteger)
f1=1return0
f1=0return1
11.在窗体中添加一个命令按钮,然后编写如下代码:
Functionfunc(aAsInteger,bAsInteger)AsInteger
StaticmAsInteger,iAsInteger
m=0
i=2
i=i+m+1
m=i+a+b
func=m
EndFunction
DimkAsInteger,mAsInteger
DimpAsInteger
k=4
m=1
p=func(k,m)
Printp;
Printp
程序运行后,单击命令按钮,输出结果为:
A、817B、816C、820D、88
12.Sub过程与Function过程最根本的区别是:
A、Sub过程可以用Call语句直接使用过程名调用,而Function过程不可以
B、Function过程可以有形参,Sub过程不可以
C、Sub过程不能返回值,而Function过程能返回值
D、两种过程参数的传递方式不同
13.设有如下代码:
PrivateSubForm_Load()
Show
Dimb()AsVariant
b=Array(1,3,5,7,9,11,13,15)
Callsearch(b)
Fori=0To7
Printb(i)
Nexti
此程序的功能是通过过程调用,把数组中的元素按逆序存放。
为实现此功能,缺少的过程的程序段是:
A、PrivateSubsearch(dima()asVariant)
DimT
Fori=LBound(a)ToUBound(a)
T=a(i):
a(i)=a(UBound(a)-i):
a(UBound(a)-i)=T
B、PrivateSubsearch(dima()asVariant)
DimJAsInteger
J=(LBound(a)+UBound(a))/2
Fori=LBound(a)ToJ
C、PrivateSubsearch(a()AsVariant)
D、PrivateSubsearch(a()AsVariant)
14.假定有以下两个过程:
SubS1(ByValxAsInteger,ByValyAsInteger)
DimtAsInteger
t=x
x=y
y=t
SubS2(xAsInteger,yAsInteger)
则以下说法中正确的是:
A、用过程S1可以实现交换两个变量值的操作,S2不能实现
B、用过程S2可以实现交换两个变量值的操作,S1不能实现
C、用过程S1和S2都可以实现交换两个变量值的操作
D、用过程S1和S2都不能实现交换两个变量值的操作
15.单击命令按钮时,下列程序的执行结果为:
PrivateSubCommand1_Click()
DimxAsInteger,yAsInteger
x=12:
y=32
CallPCS(x,y)
Printx;
y
PublicSubPCS(ByValnAsInteger,ByValmAsInteger)
n=n-10
m=m-10
A、1232B、232C、23D、123
16.在窗体上画一个名称为Comamnd1的命令按钮,然后编写如下通用过程和命令按钮的事件过程:
PrivateFunctionfun(ByValmAsInteger)
IfmMod2=0Then
fun=2
Else
fun=1
EndIf
DimiAsInteger,sAsInteger
s=0
Fori=1To5
s=s+fun(i)
Next
Prints
程序运行后,单击命令按钮,则窗体上显示的是:
A、6B、7C、8D、9
17.假定有如下的Sub过程:
SubS(xAsSingle,yAsSingle)
t=x
x=t/y
y=tMody
在窗体上画一个命令按钮,然后编写如下事件过程:
DimaAsSingle
DimbAsSingle
a=5
b=4
Sa,b
Printa,b
A、54 B、1l C、1.254 D、1.25l
18.设一个工程由两个窗体组成,其名称分别为Form1和Form2,在Form1上有一个名称为Command1的命令按钮。
窗体Form1的程序代码如下:
DimaAsInteger
a=10
Callg(Form2,a)
PrivateSubg(fAsForm,xAsInteger)
y=IIf(x>
10,100,-100)
f.Show
f.Caption=y
运行以上程序,正确的结果是:
A、Form1的Caption属性值为100B、Form2的Caption属性值为-100
C、Form1的Caption属性值为-100D、Form2的Caption属性值为100
19.在窗体上画一个命令按钮,然后编写如下程序:
DimaAsInteger,bAsInteger
a=1
b=2
PrintN(a,b)
FunctionN(xAsInteger,yAsInteger)AsInteger
N=IIf(x>
y,x,y)
程序运行后,单击命令按钮,输出结果为:
A、1B、2C、5D、8
20.单击命令按钮时,下列程序的执行结果为:
x=50:
y=78
CallPPP(x,y)
PublicSubPPP(ByValnAsInteger,ByValmAsInteger)
n=n\10
m=m\10
A、08B、5078C、450D、7850
21.阅读程序:
SubsubP(b()AsInteger
Fori=1To4
b(i)=2*i
PrivateSubCommandl_Click()
Dima(1To4)AsInteger
a
(1)=5
a
(2)=6
a(3)=7
a(4)=8
subPa()
Printa(i)
运行上面的程序,单击命令按钮,输出结果为:
A、2B、5C、10D、出错
4612
6714
8816
22.单击命令按钮时,下列程序的执行结果为:
DimxAsInteger,yAsInteger
x=12:
y=32
CallProc(x,y)
Printx;
PublicSubProc(nAsInteger,ByValmAsInteger)
n=nMod10
m=mMod10
A、1232B、232C、23D、123
23.设有如下通用过程:
PublicSubfun(a()AsInteger,xAsInteger)
Fori=1To5
x=x+a(i)
Next
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:
Dimarr(5)AsInteger,nAsInteger
arr(i)=i+i
funarr,n
Text1.Text=Str(n)
程序运行后,单击命令按钮,则在文本框中显示的内容是:
A、30B、25C、20D、15
24.在窗体上画一个名称为Commandl的命令按钮,再画两个名称分别为Labell、Label2的标签,然后编写如下程序代码:
PrivatexAsInteger
X=5:
Y=3
Callproc(x,Y)
Labell.Caption=X
Label2.Caption=Y
EndSub
PrivateSubproc(ByValaAsInteger,ByValbAsInteger)
X=a*a
Y=b+b
程序运行后,单击命令按钮,则两个标签中显示的内容分别是:
A、5和3B、25和3C、25和6D、5和6
25.阅读程序:
FunctionF(aAsInteger)
b=0
Staticc
b=b+l
c=c+l
F=a+b+c
a=2
Fori=1To3
PrintF(a);
A、4 4 4 B、4 5 6C、4 6 8 D、4 7 9
26.在窗体上画一个名称为Command1的命令按钮,然后编写如下通用过程和命令按钮的事件过程:
PrivateFunctionf(mAsInteger)
IfmMod2=0Then
f=m
Else
f=l
EndIf
DimiAsInteger
s=0
Fori=lTO5
s=s+f(i)
Next
Prints
程序运行后,单击命令按钮,在窗体上显示的是:
A、ll B、10 C、9 D、8
27.有如下的程序:
PrivateSubForm_Click()
DimaAsInteger,bAsInteger
a=8
b=3
Calltest(6,a,b+1)
Print"
主程序"
;
6;
a;
b
Subtest(xAsInteger,yAsInteger,zAsInteger)
子程序"
x;
y;
z
x=2
y=4
z=9
当运行程序后,显示的结果是:
A)子程序643B)主程序643C)主程序684D)子程序684
主程序684子程序684子程序643主程序643
28.在窗体中添加一个命令按钮、一个标签和一个文本框,并将文本框的Text属性置空,编写命令按钮Command1的Click事件代码:
PrivateFunctionfun(xAsLong)AsBoolean
IfxMod2=0Then
fun=True
fun=False
DimnAsLong
n=Val(text1.Text)
p=IIf(fun(n),"
偶数"
"
奇数"
Lable1.Caption=n&
"
是一个"
&
p
程序运行后,在文本框中输入20,单击命令按钮后,标签中的内容为:
A、20是一个奇数B、20C、20是一个偶数D、2
29.设有如下过程:
Subff(x,y,z,)
x=y+z
以下所有参数的虚实结合都是传址方式的调用语句是:
A、Callff(5,7,z)B、Callff(x,y,z)
C、Callff(3+x,5+y,z)D、Callff(x+y,x-y,z)
30.在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下程序:
PrivateSubCommand1Click()
Dimx,y,zAsInteger
x=5
y=7
z=0
Text1.Text=""
CallP1(x,y,z)
Text1.Text=Str(z)
SubP1(ByValaAsInteger,ByValbAsInteger,cAsInteger)
c=a+b
程序运行后,如果单击命令按钮,则在文本框中显示的内容是:
A、0 B、12 C、Str(z) D、没有显示
31.定义过程的格式中Static关键字的作用是指定过程中的局部变量在内存中的存储方式。
若使用了Static关键字,则:
A、每次调用此过程,该过程中的局部变量都会被重新初始化
B、在本过程中使用到的,在其他过程中定义的变量也为Statci型
C、每次调用此过程时,该过程中的局部变量的值保持在上一次调用后的值
D、定义了该过程中定义的局部变量为“自动”变量
32.下列关于过程叙述不正确的是:
A、过程的传值调用是将实参的具体值传值递给形参
B、过程的传址调用是将实参在内存的地址传递给形参
C、过程的传值调用参数是单向传递的,过程的传址调用参数是双向传递的
D、无论过程传值调用还是过程传址调用,参数传递都是双向的
33.下列叙述中正确的是:
A、在窗体的Form-Load事件过程中定义的变量是全局变量
B、局部变量的作用域可以超出所定义的过程
C、在某个Sub过程中定义的局部变量可以与其它事件过程中定义的局部变量同名,但其作用域只限于该过程
D、在调用过程中,所有局部变量被系统初始化为0或空字符串
34.在窗体上画一个名称为Command1的命令按钮,编写如下程序:
Printpl(3,7)
PublicFunctionpl(xAsSingle,nAsInteger)AsSingle
Ifn=0Then
pl=1
IfnMod2=1Then
pl=x*x+n
P1=x*x-n
程序运行后,单击该命令按钮,屏幕上显示的结果是:
A、2B、1C、0D、16
35.假定有以下函数过程:
FunctionFun(SAsString)AsString
Dims1AsString
Fori=1ToLen(S)
s1=UCase(Mid(S,i,1))+s1
Nexti
Fun=s1
EndFunction
PrlvateSubCommmldl_Click()
DimStr1AsString,Str2AsString
Strl=inputbox(”请输入一个字符串”)
Str2=Fun(Strl)
PrintStr2
程序运行后,单击命令按钮,如果在输入对话框中输入字符串“abcdefg”,则单击“确定”按钮后在窗体上的输出结果为:
A、abcdefgB、ABCDEFGC、gfedcbaD、GFEDCBA
36.以下叙述不正确的是:
A、在Sub过程中可以调用Function过程
B、在用Call调用Sub过程时必须把参数放在括号里
C、在Sub过程中可以嵌套定义Function
D、用Static声明的过程中的局部变量都是Static类型
37.在窗体上画一个命令按钮,其名称为Command1,然后编写如下程序:
FunctionFunc(ByValxAsInteger,yAsInteger)
y=x*y
Ify>
0Then
Func=x
Func=y
a=3
c=Func(a,b)
Print"
a="
a,
b="
:
b,
c="
c
程序运行后,单击命令按钮,其输出结果为:
A、a=3 b=12 c=3 B、a=3 b=4 c=3
C、a=3 b=4 c=12 D、a=13 b=12 c=12
38.一个工程中包含两个名称分别为Forml、Form2的窗体,一个名称为mdlFunc的标准
模块。
假定在Forml、Form2和mdlFunc中分别建立了自定义过程,其定义格式为:
Forml中定义的过程:
PriVateSubfrmfunctionl()
Form2中定义的过程:
PublicSubfrmffunction2()
mdlFunc中定义的过程:
PubliCSubmdlFunction()
在调用上述过程的程序中,如果不指明窗体或模块的名称,则以下叙述中正确的是:
A、上述三个过程都可以在工程中的任何窗体或模块中被调用
B、frmf
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 第八 VB 过程
![提示](https://static.bdocx.com/images/bang_tan.gif)