vb期末复习资料.docx
- 文档编号:17870725
- 上传时间:2023-08-04
- 格式:DOCX
- 页数:20
- 大小:22.04KB
vb期末复习资料.docx
《vb期末复习资料.docx》由会员分享,可在线阅读,更多相关《vb期末复习资料.docx(20页珍藏版)》请在冰点文库上搜索。
vb期末复习资料
VB练习题一:
1.在程序中,如果对象的名称为objname,而且对象有一个属性p,那么在代码中正确的引用该属性的格式是____。
(a)p.objname(b)objname.p(c)objname(p)(d)objname*p
2.当程序运行时,在窗体上单击鼠标,以下哪个事件是窗体不会接收到的?
(a)MouseDown(b)MouseUp(c)Load(d)Click
3.在设计应用程序时,通过____窗口可以查看到应用程序工程中的所有组成部分。
(a)代码窗口(b)窗体设计窗口(c)属性窗口(d)工程资源管理器窗口
4.通过以下哪个窗口可以在设计时直观的调整窗体在屏幕上的位置?
(a)代码窗口(b)窗体布局窗口(c)窗体设计窗口(d)属性窗口
5.在VisualBasic中,如果要获取某一个对象的联机帮助,只要选中该对象后按下___键。
(a)Esc(b)F10(c)Tab(d)F1
6.如果要向工具箱中加入控件和部件,可以利用"工程"菜单中的____命令。
(a)"引用"(b)"部件"(c)"工程属性"(d)"添加窗体"
7.如果要改变窗体的标题,需要设置窗体对象的_____属性。
(a)Name(b)Caption(c)BackColor(d)BorderStyle
8.窗体的BackColor属性用于设置窗体的____.
(a)高度(b)宽度(c)背景色(d)前景色
9.在Visualbasic中,所有的窗体和控件都必定具有的一个属性是_____。
(a)Name(b)Font(c)Caption(d)FillColor
10.窗体和控件的___属性代表了窗体和控件的宽度。
(a)Top(b)Left(c)Width(d)Height
11.通过改变选项按钮(OptionButton)控件的_____属性值,可以改变按钮的选取状态。
(a)Value(b)Style(c)Appearance(d)Caption
12.在设计菜单时,如果要在菜单中加入一个菜单分隔项,则菜单分隔项的标题必须设置为_____。
(a)加号(+)(b)减号(-)(c)星号(*)(d)感叹号(!
)
13.菜单控件仅支持以下哪个事件?
(a)Click(b)MouseDown(c)KeyPress(d)Load
14.如果要在程序中显示一个弹出式菜单,那么要调用VisualBasic中提供的_____方法。
(a)Print(b)Move(c)Refresh(d)PopupMenu
15.如果要显示VisualBasic中的预定义输入对话框,需要调用VisualBasic提供的____函数。
(a)MsgBox(b)Open(c)Output(d)InputBox
16.用以下语MsgBox"你好",vbOkOnly,"Hello"显示的消息对话框窗口的标题是____。
(a)你好(b)vbOkOnly(c)OK(d)Hello
17.以下哪个控件本身在程序运行时是绝对不可见的?
(a)工具栏(ToolBar)(b)命令按钮(CommandButton)(c)文本框(TextBox)
(d)公用对话框(CommonDialog)
18.要利用公用对话框控件来显示"保存文件"对话框,需要调用控件的___方法。
(a)ShowPrinter(b)ShowOpen(c)ShowSave(d)ShowColor
19.VisualBasic专业版中提供的____控件可以用来存储图象供其他对象使用。
(a)ToolBar(b)StatusBar(c)ImageList(d)TreeView
20.将工具栏控件的Align属性设置为____可以使工具栏自动填充在窗体的底部.
(a)vbAlignTop(b)vbAlignButton(c)vbAlignLeft(d)vbAlignNone
1.b,2.c,3.d,4.b,5.d,6.b,7.b,8.c,9.a,10.c,
11.a,12.b,13.a,14.d,15.d,16.d,17.d,18.c,19.c,20.b
VB练习题二:
1.以下变量名中,哪一个是不符合VisualBasic的命名规范的?
a.Abc901b._mnu_Open_234c.price_d.K
2.以下变量声明语句DimMyData所声明的变量MyData是什么类型?
a.整型(Integer)b.字符串型(String)c.变体型(Variant)d.双精度型(Double)
3.符号%是声明()类型变量的类型定义符?
a.Integerb.Variantc.Singled.String
4.执行下列语句后整型变量a的值是多少?
a.10b.20c.30d.不确定
If(3-2)>2Then
a=10
ElseIf(10/2)=6Then
a=20
Else
a=30
EndIf
5.在四个运算符:
加(+),减(-),乘(*),乘方(^)中,优先级最高的是
a.+b.-c.*d.^
6.在用Dimx(2,6to9)语句所声明的数组中不包括下列哪个元素?
a.x(2,6)b.x(1,9)c.x(0,7)d.x(-1,8)
7.用Dim(1,3to7,10)声明的是一个几维数组?
a.1b.2c.3d.4
8.逻辑表达式((10>9)and(8>9))or(not(4>5))的值是
a.Trueb.Falsec.结果不确定d.条件不足
9.函数过程(用Function定义)与子过程(用Sub定义)的最大区别是
a.函数过程有返回值b.子过程有返回值c.函数过程可以带参数d.子过程可以带参数
10.以下哪个语句定义了一个单精度变量?
a.Dimaasintegerb.Dima%c.Dima!
d.Dima
11.在VisualBsaic代码中,将多个语句合并写在一行上的并行符是
a.撇号(')b.冒号(:
)c.感叹号(!
)d.星号(*)
12.声明一个全局变量的关键字是
a.Dimb.Publicc.Privated.Global
13.如果x是一个变量,那么下列哪一个不是赋值语句?
a.Letx=10b.x=10c.Setx=nothingd.casex=10
14.在一行VisualBsaic代码中,下列哪个符号后的内容将被认为是注释?
a.撇号(')b.冒号(:
)c.感叹号(!
)d.星号(*)
15.在下面的循环语句中,在括号处缺少了哪一个关键字?
Do
i=i+1
()whilei<10
a.NextbUntilc.Ford.Loop
16.在VisualBasic中用什么关键字来定义常量?
a.Dimb.Globalc.Constd.Redim
17.在代码中定义了一个子过程
SubP(a,b)
...
EndSub
下面哪一个调用该过程的格式是正确的?
a.CallPb.CallP10,20c.CallP(10,20)d.P(10,20)
18.在For...Next循环语句中,如果省略Step子句,则循环的步长为
a.-1b.0c.1d.10
19.下列那个语句可以为动态数组分配实际元素个数?
a.Dim语句b.static语句c.public语句d.ReDim语句
20.用于去掉一个字符串的右边的空白部分的函数是:
a.RTrim$()b.Right$()c.Asc()d.Time$()
1.b,2.c,3.a,4.c,5.c,6.d,7.c,8.a,9.a,10.c,
11.b,12.d,13.d,14.a,15.d,16.c,17.c,18.c,19.d,20.a
VB练习题三:
1.要向一个图片框(PictureBox)控件中加入一幅图片,需要设置控件的__属性?
a.Appearanceb.Fontc.Pictured.Align
2.如果要在程序代码中为图片框动态加载和清除图象,可以利用()函数.
a.InputBoxb.Inputc.LoadPictured.PaintPicture
3.如何使图象(Image)控件中的图象自动适宜控件的大小?
a.将控件的AutoSize属性设为Trueb.将控件的AutoSize属性设为False
c.将控件的Stretch属性设为Trued.将控件的Stretch属性设为false
4.如果要改变直线(Line)控件使它显示为点划线,那么需要设置控件的()属性
a.BorderStyleb.BorderWidthc.X1d.Y1
5.利用形状控件的()属性可以使控件显示为不同的形状.
a.Shapeb.DrawModec.BackStyled.FillStyle
6.文件列表框控件的()属性用来确定在列表框中显示的文件名.
a.Pathb.Patternc.FileNamed.List
7.VisualBasic根据计算机访问文件的方式将文件分成三类,其中不包括()
a.顺序文件b.Unix文件c.二进制文件d.随机文件
8.在VisualBasic中打开一个顺序文件时,可以采用几种打开方式?
a.1b.2c.3d.4
9.以下语句用于打开一个顺序文件Open"C:
\MyFile.txt"ForOutPut但该语句的一个重要错误是没有()
a.指定打开方式b.指定文件号c.指定打开文件名d.指定文件类型
10.随机型文件以什么单位来进行文件读取?
a.字节b.记录c.整个文件d.字符
11.利用()函数可以判断在访问文件时是否已经到达了文件尾?
a.BOFb.EOFc.LOFd.LOC
12.用Write和Input语句向文件中写入多个数据的差别在于()
a.Write语句将自动加入逗号分隔符b.Input语句将自动加入逗号分隔符
c.Write语句将自动加入回车d.Input语句将自动加入回车
13.每个VisualBasic应用程序中最多可以包含几个MDI窗体?
a.1b.2c.3d.4
14.将一个窗体设置为MDI子窗体的方法是()?
a.将窗体的名称改为MDIb.将窗体的MDIChild属性设为True
c.将窗体的MDIChild属性设为Falsed.将窗体的Enabled属性设为False
15.要在MDI窗体中排列子窗体的位置,要利用MDI窗体的()方法?
a.Moveb.Showc.Refreshd.Arrange
16.当我们输入代码时,VisualBasic可以自动检测哪种错误?
a.语法错误b.编译错误c.运行错误d.逻辑错误
17.以下哪个Onerror语句将关闭程序中的错误处理功能。
a.OnerrorResumeNextb.Onerrorgoto1
c.Onerrorgoto0d.OnerrorgotoRetry
18.在调试程序时,如果想要动态改变程序中的变量的值,可以利用()窗口?
a.监视b.快速查看c.立即d.本地
19.要显示当前过程中的所有变量及对象的取值,可以利用()窗口?
a.监视b.调用堆栈c.立即d.本地
20.在程序处于中断模式时,要在立即窗口中显示变量X的值,可以输入()后回车即可。
a.?
Xb.!
Xc.=Xd.DisplayX
1.c,2.c,3.c,4.a,5.a,6.b,7.b,8.c,9.b,10.b,
11.b,12.a,13.a,14.b,15.d,16.a,17.c,18.c,19.d,20.a
(1)DIMA(11TO30)所定义的数组有多少个元素?
A)11B)20C)30D)330
(2)PrintInt(Rnd(0)*11)+10的值的范围是
A)[0,10]B)[10,10]C)[10,20]D)[0,20]
(3)下面程序运行后,输出的结果是
PrivateSubForm_Click()
Dima,b,c
Printc=b=a
EndSub
A) FalseB)0C)TrueD)显示出错信息
注意:
运算顺序,c=b,得true的值,再true=a,得false
(4)下面程序执行后C的值是
PrivateSubForm_Click()
a=-1.2:
b=321
c=Len(Str$(a)+Str$(b))
Printc
EndSub
A)3B)4C)6D)8
注意:
数值型数转化为字符型时,前面有一个符号位
(5)下面程序执行的结果是
PrivateSubForm_Click()
a$="123":
b$="456"
c=Val(a$)+Val(b$)
Printc
EndSub
A)123B)456C)"579"D)579
(6)下面程序运行时输出的结果是
PrivateSubForm_Click()
ForX=1To2
a=0
ForY=1ToX
a=a+1
NextY
Printa;
NextX
EndSub
A)11B)00C)12D)23
(7)下面程序运行时输出的结果是
PrivateSubForm_Click()
J=0
DoWhileJ<30
J=(J+1)*(J+2)
N=N+1
Loop
PrintN;J
EndSub
A)01B)3182C)430D)3030
注意:
⑴J=2,N=1;⑵J=12,N=2;⑶J=13*14=182,N=3
(8)下面程序运行时输出的结果是
PrivateSubForm_Click()
DimA(3,3)
ForJ=1To3
ForK=1To3
A(J,K)=(J-1)*3+K
NextK
NextJ
ForJ=2To3
ForK=1To2
PrintA(K,J);
NextK
NextJ
EndSub
A)25B)23C)47D)45
36565878
注意:
得到的数组是:
123
456
789
要求输出的元素是:
A(1,2),A(2,2)
A(1,3),A(2,3)
(9)下面程序运行时输出的结果是
PrivateSubForm_Click()
ForK=3To1Step-1
X$=String$(K,"*")
PrintX$
NextK
EndSub
A)*B)1*C)3*D)***
**2*2****
***3*1****
注意:
string函数的使用:
String(numberaslong, char)
(10)下面程序运行时输出的结果是
PrivateSubForm_Click()
S=0
ForK=1To3
IfK<1Then
X=1
ElseIfK<=2Then
X=2
ElseIfK<3Then
X=3
Else
X=4
EndIf
PrintX;
S=S+X
NextK
PrintS
EndSub
A)3339B)3216C)1236D)2248
注意要求输出的数据(运行时
(1)x=2,s=2;
(2)x=2,s=4;(3)x=4,s=8),输出的是每次的x值与最后的s值
(11)下面程序运行后的输出是(727)
PrivateSubForm_Click()
K=1
ForJ=1To6
K=K*J
NextJ
PrintK+J
EndSub
(12)下面程序运行后的输出Y的值是(61)
PrivateSubForm_Click()
ForA=1To5
Y=1
ForB=1To10
ForC=1To6
Y=Y+1
NextC
NextB
NextA
Print"Y=";Y
EndSub
注意:
只需考虑A=5时,共循环了多少次
(13)语句PrintSgn(-3^2)+Int(-3^2)运行时输出的结果为
A)-1B)27C)1D)-10
注意:
sgn函数,返回数值数据的正负号,>0时值1,<0时值-1,=0为0
(14)骰子是一个正六面体,用1~6这六个数分别代表这六面,掷一次骰子出现的数可表示为:
A)Int(Rnd(6)+1)B)Int(Rnd*6)C)Int(Rnd*7)D)Int(Rnd*6+1)
(15)语句DimA(4,5,6)定义的数组的元素个数是
A)15B)120C)210D)456
注意:
未说明为optionbase1,则系统默认为base0
(16)下面程序执行的结果是
PrivateSubForm_Click()
A$="123":
B$="456"
C=Val(A$)+Val(B$)
PrintC\100
EndSub
A)123B)3C)5D)579
(17)下面程序运行时输出的结果是
PrivateSubForm_Click()
ForX=1To2
A=0
ForY=0ToX-1
A=A+1
NextY
PrintA;
NextX
EndSub
A)11B)03C)12D)36
(18)语句Print"25*40"输出的结果是
A)"25*40"B)出现错误信息C)25*40D)1000
(19)有如下程序
PrivateSubForm_Click()
A=1
b=2
c=3
A=b
b=c
c=A
PrintA;b;c
EndSub
运行后输出的结果是
A)123B)231C)232D)223
注意:
变量名不区分大小写
(20)下面程序运行时输出的结果是
PrivateSubForm_Click()
S=0
ForK=3To1Step-1
IfK<=1ThenX=1
IfK<=2ThenX=2
IfK<=3ThenX=3
PrintX;
S=S+X
NextK
PrintS
EndSub
A)3339B)3216C)1113D)1236
(1)下面程序运行后的输出S的值是(16)
PrivateSubForm_Click()
ForK=1To5
S=0:
J=1
ForM=1ToK
J=J+M
NextM
S=S+J
NextK
PrintS
EndSub
(2)下面程序运行后输出结果是
PrivateSubForm_Click()
X$="A":
Y$="B":
Z$="C"
ForJ=1To2
X$=Y$:
Y$=Z$:
Z$=X$
NextJ
PrintX$+Y$+Z$
EndSub
A)CABB)BCAC)BCBD)CBC
(3)下面程序的循环次数是
PrivateSubForm_Click()
ForJ=8To35Step3
PrintJ;
NextJ
EndSub
A)10B)9C)27D)28
(4)下面程序的输出结果是
PrivateSubForm_Click()
A$="HAPPY"
B$="NEW"
C$="YEAR!
"
D$=C$+B$+A$
PrintRight$(D$,6);Mid$(D$,6,4);Left$(D$,5)
EndSub
A)HAPPYNEWYEAR!
B)YEAR!
NEWHAPPY
C)NEWYEAR!
HAPPYD)NEWHAPPYYEAR!
(5)有如下程序
PrivateSubForm_Click()
A=3
b=4
PrintA=b
EndSub
运行后输出的结果是
A)FalseB)TrueC)0D)显示出错信息
(6)有如下程序
PrivateSubForm_Click()
Form=1To3
Forj=1Tom
Fork=jTo3
N=N+1
Nextk
Nextj
Nextm
PrintN
EndSub
运行后N的值为
A)3B)14C)9D)21
(7)有如下程序
PrivateSubForm_Click()
A$="12"
b$="34"
c$=A$+b$
d=Val(c$)
Printd\10
EndSub
运行后输出的结果是
A)12B)34C)46D)123
(8)有如下程序
PrivateSubForm_Click()
A=12.3
b=-123
m=Len(Str$(A)+Str$(b))
Printm
EndSub
运行后输出的结果是
A)9B)5C)7D)8
(9)有如下程序
PrivateSubForm_Click()
Forj=1To15
A=A+jMod3
N
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- vb 期末 复习资料