VB程序设计复习资料Word格式文档下载.docx
- 文档编号:19244278
- 上传时间:2023-01-04
- 格式:DOCX
- 页数:33
- 大小:97.63KB
VB程序设计复习资料Word格式文档下载.docx
《VB程序设计复习资料Word格式文档下载.docx》由会员分享,可在线阅读,更多相关《VB程序设计复习资料Word格式文档下载.docx(33页珍藏版)》请在冰豆网上搜索。
掌握选择结构(行If、块If、SelectCase),控件的常用属性、方法,根据解题需要正确地选择控件、编制控件的相应事件过程。
第五章循环结构
for循环,当循环,do循环,多重循环
正确使用循环结构(For/Nex、ExitFor、Do/Loop、ExitDo、While/Wend)
第六章数组和基他控件
数组,数组的应用举例,控件数组,列表框和组合框控件,滚动条控件,定时器控件。
熟练掌握数组的定义、表示与使用;
要求熟悉数组的选择排序(分类)或冒泡法等常用算法;
以上控件的常用属性、方法,利用已学的控件建立控件数组。
根据解题需要正确地选择控件、编制控件的相应事件过程。
第七章过程
函数过程与SUB过程。
掌握Sub过程的定义与调用、Function函数过程的定义与调用;
理解参数传递规则;
变量和常量的作用域及生存期,包括相关的声明语句或关键字。
第八章图形控件与图形方法
VB坐标系,图片框控件,影像框控件,形状控件和直线控件,图形方法
以上控件的常用属性、方法;
改变VB坐标系;
画点、线(矩形)、圆(弧与椭圆);
正确地使用颜色。
第九章对话框与菜单
通用对话框控件,菜单设计
通用对话框控件的建立和使用(如何打开不同对话框?
对话改变了控件的属性是什么?
);
用菜单编辑器创建菜单;
掌握菜单的常用属性;
掌握菜单的Click事件。
第十章文件
与文件操作有关的控件,直接调用外部可执行文件的Shell方法,数据文件的操作。
理解文件的概念;
熟练掌握驱动器列表框、目录列表框和文件列表框的功能和综合作用;
顺序文件的基本操作。
第十一章数据库的应用
数据库的基本知识;
数据控件
会建立简单的数据库,并会使用常用的数据控件。
三、学习进度
四、课程考核方式及题型本课程采用一页开卷考试,题目类型见五套样卷,题型和样卷一致。
五、教材
省教育厅重点教材《VisualBasic6.0程序设计》,2007年8月浙江大学出版社,张健等编。
VB练习题
(一)
一、判断题(每题1分,共10分)
()1.由VisualBasic语言编写的应用程序有解释和编译两种执行方式。
()2.文本框控件的MaxLength属性值为0时,在文本框内不可以输入任何字符。
()3.要使输入文本框的字符始终显示“#”,则应修改其PasswordChar属性为“#”。
()4.在一个窗体中不能使用Unload来卸载本窗体,即一个窗体只能由其它窗体卸载。
()5.VB的Double类型数据,可以精确表示其数值范围内的所有实数。
()6.在图片框中添加的控件,其Top和Left属性值是相对图片框而言的,与窗体无关。
()7.命令按钮不但能响应单击事件,而且还能响应双击事件。
()8.在自定义函数过程中,函数名必须被赋值。
()9.文本框控件只能响应KeyPress、KeyDown、KeyUp、Change事件。
()10.如果一个菜单项的Visible属性为False,则它的子菜单也会显示。
二、单选题(每题2分,共20分)
()11.要改变控件的高度,应修改控件的_______属性。
A、TopB、LeftC、HeightD、Width
()12.VB算术运算符乘或除、整除、求余的优先级,从高到低依次为_______。
A、乘或除、求余、整除B、乘或除、整除、求余
C、整除、求余、乘或除D、整除、乘或除、求余
()13.下列哪个属性用来表示标签(Label)的内容和窗体(Form)的标题_______。
A、CaptionB、TextC、LeftD、Name
()14.判断整型变量m能否被n整除的VB表达式为_______。
A、nModm=0B、m/n*n=mC、mModnD、m\n*n=m
()15.选中复选框控件时,Value属性的值为_______。
A、TrueB、FalseC、0D、1
()16.在窗体Form1的一个事件过程中,使用_______来清除窗体上所绘制的图形的方法是不正确的。
A、Form1.ClsB、Form.ClsC、Me.CLSD、Cls
()17.设计动画时通常用时钟控件_______属性来控制动画速度。
A、IntervalB、TimerC、MoveD、Enabled
()18.使用Circle方法不可以绘制的图形是_______。
A、圆角矩形B、椭圆C、圆饼图D、扇形
()19.运行时组合框控件Comb1中所选择的表项,可以表示为_______。
A、Comb1.TextB、Comb1.ListIndexC、Comb1.ListD、Comb1.ListCount
()20.若i的初值为9,则下列循环语句的循环次数为_______次。
DoWhilei<
=20
i=i+3
Loop
A、3次B、4次C、5次D、6次
三、程序填空题(每空2分,共20分)
1.【程序说明】以下程序产生30个两位随机整数、并按从小到大的顺序存入数组a中,再将其中的奇数按从小到大的顺序在窗体中用紧凑格式输出。
PrivateSubForm_Click()
Dima(30)Asbyte,iasByte,jAsByte,mAsByte
Fori=1To30
a(i)=(21)
Nexti
Fori=1To29
Forj=(22)
Ifa(i)>
a(j)Thenm=a(i)
(23)
a(j)=m
Nextj
Nexti
If(24)Then(25)
EndSub
(21)(22)
(23)(24)(25)
2.【程序说明】下列程序运行时,单击Command1(0)后,图片每秒自动左移1毫米,单击Command1
(1)停止移动(当图片尾部移出窗体后,图片从窗体右端进入窗体)。
界面设计如下图1所示。
图1程序2的界面设计
【程序】
PrivateSubCommand1_Click(IndexAsInteger)
IfIndex=0Then(26)ElseTimer1.Enabled=False
EndSub
PrivateSubForm_Load()
Timer1.Interval=(27)
Form1.ScaleMode=6
(28)
PrivateSubTimer1_Timer()
Picture1.Left=(29)
IfPicture1.Left+Picture1.Width<
=Form1.ScaleLeftThen_
(30)=Form1.ScaleLeft+Form1.ScaleWidth
(26)(27)
(28)(29)(30)
四、程序阅读题(每小题5分,共20分)
程序31、请写出单击窗体三次后,窗体上的显示结果。
StaticaAsInteger
DimbAsInteger
b=a+b+2
a=a+b
Form1.Print"
a="
;
a,"
b="
b
程序32、请写出单击窗体后,窗体上的显示结果。
Fori%=1To7
PrintSpc(7-i);
Forj%=1To(2*i%)-1:
Print"
M"
;
:
Nextj%
Nexti%
程序33、写出程序运行时,单击Option1
(2)后,窗体上的显示结果。
PrivateSubForm_Load()
Option1(0).Value=False
Option1
(1).Value=False
Option1
(2).Value=False
PrivateSubOption1_Click(IndexAsInteger)
IfOption1(Index).Value=TrueThen
SelectCaseIndex
Case0
Check1(0).Value=1:
Check1
(1).Value=0
Case1
Check1(0).Value=0:
Check1
(1).Value=1
Case2
EndSelect
IfCheck1(0).Value=1ThenPrint"
您好"
IfCheck1
(1).Value=1ThenPrint"
欢迎使用VisualBasic!
"
EndIf
程序34、设Text1.Text为"
abcdef"
,运行时连续单击3次控件HScroll1右侧箭头后,分别写出组合框控件中的第1项、第2项及第3项的内容。
HScroll1.SmallChange=1:
HScroll1.Max=5
HScroll1.Min=1:
HScroll1.Value=1
Combo1.Clear
PrivateSubHScroll1_Change()
Combo1.AddItemLeft(Text1.Text,HScroll1.Value),0
EndSub
五、程序设计题(每题10分,共30分)
35.编制事件过程Command1_Click,执行该过程时输入n以及n个数,计算这n个数的和并在文本框控件Text1中显示。
(10分)
36.编制通用函数过程fsum,计算Single类型一维数组所有元素的和。
37.在窗体上建立命令按钮“Command1”(显示)和“Command2”(退出)。
运行时,“Command2”按钮始终显示“退出”;
单击“显示”按钮后窗体上显示“欢迎使用VisualBasic!
”同时标题改为“清除”,再单击“清除”按钮后,界面恢复窗体装入时的初态。
VB练习题
(一)参考答案
试题一、判断题(每小题1分,共10分)
1.√2.×
3.√4.×
5.×
6.√7.√8.√9.×
10.×
试题二、单选题(每小题2分,共20分)
11.C12.B13.A14.D15.D16.B17.A18.A19.C20.B
试题三、程序填空题(每空2分,共20分)
21.Int(Rnd*90)+1022.i+1To3023.a(i)=a(j)24.a(i)Mod2<
>
025.Printa(i);
26.Timer1.Enabled=True27.100028.Timer1.Enabled=False29.Picture1.Left-130.Picture1.Left
试题四、程序阅读题(每小题5分,共20分)
31.a=2b=2
a=6b=4
a=14b=8
32.M
MMM
MMMMM
MMMMMMM
MMMMMMMMM
MMMMMMMMMMM
MMMMMMMMMMMMM
33.您好
欢迎使用VisualBasic!
34.abcdabcab
试题五、程序设计题(每小题各10分,共30分)
35.编制事件过程Command1_Click,执行该过程时输入n以及n个数,计算这n个数的和并在文本框控件Text1中显示。
PrivateSubCommand1_Click()
DimsAsSingle,nAsInteger,xAsSingle
n=InputBox("
输入n"
)
Fori=1Ton
x=InputBox("
x="
):
s=s+x
Text1.Text=s
36.编制通用函数过程fsum,计算Single类型一维数组所有元素的和。
PrivateFunctionfsum(a()AsSingle,nAsSingle)AsSingle
DimiAsInteger
Fori=1Ton
fsum=fsum+a(i)
Nexti
EndFunction
37.在窗体上建立命令按钮“Command1”(显示)和“Command2”(退出)。
IfCommand1.Caption="
显示"
Then
欢迎使用VisualBasic!
Command1.Caption="
清除"
Else
Form1.Cls:
PrivateSubCommand2_Click()
End
VB练习题
(二)
一、判断题(每题1分,共10分)
()1.VB是以结构化的Basic语言为基础、以事件驱动作为运行机制的可视化程序设计语言。
()2.用DIM定义数值变量时,该数值变量自动赋初值为0。
()3.移动框架时框架内控件也跟随移动,因此框架内控件的Left和Top属性值也随之改变。
()4.列表框和文本框一样均没有Caption属性,但都具有Text属性。
()5.图片框可以通过Print方法来显示文本。
()6.语句“FontName="
宋体"
”与“Form1.FontName="
”的作用完全相同,无一例外。
()7.SetFocus方法是把焦点移到指定对象上,使对象获得焦点,该方法适用于所有控件。
()8.由于定时器控件在运行时是不可见的,因此在设置时可任意地将其放在任何位置。
()9.表示各控件对象的变量名的属性为Caption。
()10.决定对象是否可见的属性是Visible属性,决定对象可用性的属性是Enabled属性。
()11.下列哪个属性用来表示各对象(控件)的位置_______。
A、TextB、CaptionC、LeftD、Name
()12.List1.Clear中的Clear是_______。
A、方法B、对象C、属性D、事件
()13.将文本框控件的_______属性设置为True,可正常显示文本但不可编辑。
A、LockedB、EnabledC、MultiLineD、Visible
()14.取字符串Ax从第1个非空格符开始的连续5个字符,写作表达式_______。
A、Mid(Ax,1,5)B、Left(Trim(Ax),5)
C、Left(Ax,5)D、Mid(Trim(Ax),5)
()15.数学式(x+5)1/3写成VB表达式是_______。
A、(x+5)^1/3B、(x+5)^(1\3)C、(x+5)^1\3D、(x+5)^(1/3)
()16.要使Shape控件以实心方式填充,应该设置其_______属性。
A、FillColorB、FillStyleC、BackStyleD、Shape
()17.将命令按钮Command1设置为不可见,应修改该命令按钮的_______属性。
A、VisibleB、ValueC、CaptionD、Enabled
()18.将变量x、y中的最大数赋值给变量a,正确的表示为_______。
A、a=Ify>
xThenyElsexB、Ify>
xThena=y:
a=x
C、a=x:
Ify>
xThena=yD、Ify>
xThena=yElsea=xEndIf
()19.文本框控件Text4的Text属性默认值为_______。
A、Text4B、"
Text4"
C、LockedD、Name
()20.描述以(1000,1000)为圆心、以400为半径画1/4圆弧的语句,正确的是_______。
A、Circle(1000,1000),400,0,3./2
B、Circle(1000,1000),,400,0,3./2
C、Circle(1000,1000),400,,0,3./2
D、Circle(1000,1000),400,,0,90
三、程序填空题(每空2分,共20分)
1.【程序说明】利用一个计时器、一个标签框和二个命令按钮制作一个动态秒表,如图1所示。
单击“开始”命令按钮,秒表开始计时,单击“结束”命令按钮,秒表结束计时,并在标签框显示运行时间,如“运行了0小时2分10秒”。
(假设对象的属性都在程序代码中设定)
图1动态秒表
程序代码如下:
DimxAsLong
DimhAsInteger,mAsInteger,sAsInteger
Form1.Caption="
动态秒表(小时:
分:
秒)"
开始"
Command2.Caption="
结束"
Label1.Alignment=”Center”
Label1.Caption="
0:
0"
Timer1.Interval=(21)
Timer1.Enabled=False
x=0
PrivateSubCommand1_Click()
(22)
PrivateSubCommand2_Click()
x=(23)
运行了"
+Str(h)+"
小时"
+Str(m)+_
"
分"
+Str(s)+"
秒"
(24)
h=x\3600
m=(xMod3600)\60
s=(25)
Label1.Caption=Str(h)+"
:
+Str(m)+"
+Str(s)
2.【程序说明】本程序将1个大于100的偶数n分解为2个素数之和。
其中nflag逻辑型函数用于判断自然数x是否为素数。
PrivateSubForm_Click()
DimnAsInteger,xAsInteger,yAsInteger
n=Val(InputBox(”请输入1个大于100的偶数”,”输入数据”,100))
Forx=3Ton\2Step2
Ifnflag(x)Then
y=(26)
Ifnflay(y)Then
Form1.Printn;
”=”;
x;
”+”;
y:
ExitFor
EndIF
EndIf
(27)
Functionnflag(xAsInteger)
DimflagAsBoolean
k=2:
m=Int(Sqr(x))
flag=(28)
DoWhilek<
=m
IfxModk=0Thenflag=False
(29)
nflag=(30)
程序31、写出程序运行时单击窗体后,Form1上的输出结果。
PrivateSubForm_click()
Dimxasstring
Dimiasinteger,nasinteger
Form1.cls
x=”ABCDEFG
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VB 程序设计 复习资料