VB第6章课后练习答案.docx
- 文档编号:24871435
- 上传时间:2023-06-02
- 格式:DOCX
- 页数:6
- 大小:16.68KB
VB第6章课后练习答案.docx
《VB第6章课后练习答案.docx》由会员分享,可在线阅读,更多相关《VB第6章课后练习答案.docx(6页珍藏版)》请在冰豆网上搜索。
VB第6章课后练习答案
第6章过程与函数
一、填空题
1.数组名作为过程或函数实参,相应的形参传递方式为____按地址传递____。
2.一维长整型数组a作过程形参写作:
a()AsLong,二维长整型数组b作过程形参写作:
____b()AsLong____。
3.过程形参为整型,对应实参为5.64,传递给形参的值为____6____。
4.调用过程时对形参的改变不会导致相应实参变量的改变,则该形参采用____按值传递____方式。
5.调用过程时对形参的改变就是对相应实参变量的改变,则该形参采用____按地址传递____方式。
6.声明Single类型全局变量x,写作____PublicxAsSingle(或Publicx!
)____;声明Integer类型静态变量x,写作____StaticxAsInteger(或Staticx%)____。
7.在窗体Form1的过程中引用窗体Form2中的全局变量y,写作____Form2.y____。
8.阅读如下代码,单击窗体后,窗体上的显示结果为____s=2s=5s=9____。
DimiAsInteger,nAsInteger
PrivateSubForm_Click()
DimiAsInteger
Fori=1To3
s=sum(i):
Print"s=";s;
Nexti
EndSub
PrivateFunctionsum(nAsInteger)
StaticjAsInteger
j=j+n+1:
sum=j
EndFunction
二、选择题
1.VB程序设计语言中,函数过程与子过程必须分别用关键字(C)声明。
(A)Private,Public(B)Public,Private
(C)Function,Sub(D)Sub,Function
2.要调用一个已经定义好的函数myfunction(),用语句的方式调用函数,下列写法哪个是正确的(D)
(A)Callmyfunction(B)myFunction
(C)myFunction()(D)CallmyFunction()
3.定义过程时,如果在过程名前加关键字Private,则该过程为(A)。
(A)它是私有过程,仅在定义该过程的模块内有效,模块内的过程可以调用该过程
(B)它是公有过程,在整个工程内有效,模块外的过程可以调用该过程
(C)它是私有过程,在整个工程内有效,模块外的过程可以调用该过程
(D)它是公有过程,仅在定义该过程的模块内有效,模块内的过程可以调用该过程
4.在过程中用Dim保留字定义的变量是(B)
(A)全局变量(B)局部变量(C)静态变量(D)以上都不是
5.防止递归函数进入死锁的机制是(A)
(A)在适当的条件下返回(B)通过Stop语句终止递归调用
(C)通过End语句终止递归函数(D)不需要返回
6.关于函数与子程序的关系,下面说法正确的是(A)
(A)函数执行完后将得到一个返回值,而子程序只是执行一系列动作
(B)函数可以不带参数,而子程序必须带参数
(C)在函数中只用到传地址的方式,而子程序只能用到传值方式
(D)子程序可以被其他子程序调用,而函数不能被其他函数调用
7.VisualBasic6.0中缺省的参数传递机制是(B)
(A)传值(B)传址(C)传值和传地址(D)从实参到形参
8.使用(C)语句可以实现过程的特殊出口。
(A)PublicSub/Function(B)Call过程名
(C)ExitSub/Function(D)PrivateSub/Function
三、思考题
1.静态变量和动态变量的区别是什么?
2.函数过程与子程序过程有什么区别?
3.子过程调用有哪几种形式?
4.什么是形参?
什么是实参?
什么是值引用?
什么是地址引用?
对应的实参有没有限制?
5.怎样引用其他模块的过程和变量?
6.编制通用函数过程,计算Double类型一维数组所有元素的平均值。
7.编制通用Sub过程,将Single类型一维数组反序排放(如实参数组元素依次为6、5、9、7,调用后为7、9、5、6;若为-3.2、4、2.6、31、7.3,调用后为7.3、31、2.6、4、-3.2)。
8.编制通用Sub过程,在一个m行n列二维数组中查找绝对值最大的元素,以及该元素的行号、列号(提示:
Sub过程的形参列表如x()AsSingle,mAsbyte,nAsByte,xmaxAsSingle,kiAsByte,kjAsByte)。
9.输出100—300间的素数,要求:
(1)用函数判断素数。
(2)每行输出10个数。
10.设计一个将一维数组按降序排列的子过程(假设数据个数不知道),然后编程:
(1)自动产生并输出100个[100,999]间的正整数,并要求每行输出10个数据。
(2)调用该过程对数据按降序排列后再按每行10个输出。
6-3-7解答:
PrivateSubForm_Click()
Dima()AsSingle
ReDima(10)
Print"反序前:
"
Fori=1To10
a(i)=Rnd*201-100
PrintFormat(a(i),"###.##");
Nexti
Callinver(a(),10)
Print"反序后:
"
Fori=1To10
PrintFormat(a(i),"###.##");
Nexti
EndSub
PrivateSubinver(a()AsSingle,nAsInteger)
DimiAsInteger,tAsSingle
Fori=1Ton\2
t=a(n-i+1)
a(n-i+1)=a(i)
a(i)=t
Nexti
EndSub
6-3-8解答:
6-3-9解答:
PrivateSubForm_Click()
s=0
Fori=100To300
Ifprime(i)Then
Printi;:
s=s+1
IfsMod10=0ThenPrint
EndIf
Nexti
EndSub
PrivateFunctionprime(x)AsBoolean
Ifx<2Then
prime=False
ExitFunction
EndIf
k=Sqr(x)
Fori=2Tok
IfxModi=0Then
prime=False
ExitFunction
EndIf
Next
prime=True
EndFunction
6-3-10解答:
PrivateSubForm_Click()
DimiAsInteger,nAsInteger
Dima(100)AsInteger
Print"排序前:
"
Fori=1To100
a(i)=Int(900*Rnd()+100)
Printa(i);
IfiMod10=0ThenPrint
Nexti
Print"排序后:
"
Callss(a(),100)
Fori=1To100
Printa(i);
IfiMod10=0ThenPrint
Nexti
EndSub
PrivateSubss(a()AsInteger,nAsInteger)
Fori=1Ton-1
Forj=i+1Ton
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VB 课后 练习 答案