全国计算机等级考试二级VB模拟试题2.docx
- 文档编号:10951405
- 上传时间:2023-02-23
- 格式:DOCX
- 页数:13
- 大小:20.22KB
全国计算机等级考试二级VB模拟试题2.docx
《全国计算机等级考试二级VB模拟试题2.docx》由会员分享,可在线阅读,更多相关《全国计算机等级考试二级VB模拟试题2.docx(13页珍藏版)》请在冰豆网上搜索。
全国计算机等级考试二级VB模拟试题2
2007年9月全国计算机等级考试二级VB模拟试题(13)及答案
一、选择题
(1)由两个栈共享一个存储空间的好处是
A)减少存取时间,降低下溢发生的机率
B)节省存储空间,降低上溢发生的机率
C)减少存取时间,降低上溢发生的机率
D)节省存储空间,降低下溢发生的机率
正确答案:
B
(2)设有两个串p和q,求q在p中首次出现位置的运算称作
A)连接
B)模式匹配
C)求子串
D)求串长
正确答案:
B
(3)n个顶点的连通图中边的条数至少为
A)0
B)1
C)n-1
D)n
正确答案:
C
(4)对象实现了数据和操作的结合,是指对数据和数据的操作进行
A)结合
B)隐藏
C)封装
D)抽象
正确答案:
C
(5)下列叙述中,正确的是
A)软件就是程序清单
B)软件就是存放在计算机中的文件
C)软件应包括程序清单及运行结果
D)软件包括程序和文档
正确答案:
D
(6)软件设计中,有利于提高模块独立性的一个准则是
A)低内聚低耦合
B)低内聚高耦合
C)高内聚低耦合
D)高内聚高耦合
正确答案:
C
(7)软件生命周期中花费时间最多的阶段是
A)详细设计
B)软件编码
C)软件测试
D)软件维护
正确答案:
D
(8)下列4项中说法不正确的是
A)数据库减少了数据冗余
B)数据库中的数据可以共享
C)数据库避免了一切数据的重复
D)数据库具有较高的数据独立性
正确答案:
C
(9)下列4项中,必须进行查询优化的是
A)关系数据库
B)网状数据库
C)层次数据库
D)非关系模型
正确答案:
A
(10)最常用的一种基本数据模型是关系数据模型,它的表示应采用
A)树
B)网络
C)图
D)二维表
正确答案:
D
(11)下列说法不正确的是
A)对象的可见性可设为True或False
B)标题的属性值可设为任何文本
C)属性窗口中属性可以按字母顺序排列
D)某些属性的值可以跳过不设置,系统自动设为空值
正确答案:
D
(12)要设置窗体为固定对话框,并包含控制菜单栏和标题栏,但没有最大化和最小化按钮,设置的操作是
A)设置BoderStyle的值为FixedToolWindow
B)设置BoderStyle的值为SizableToolWindow
C)设置BoderStyle的值为FixedDialog
D)设置BoderStyle的值为Sizable
正确答案:
C
(13)下面的控件可作为其他控件容器的是
A)PictureBox和Data
B)Frame和Image
C)PictureBox和Frame
D)Image和Data
正确答案:
C
(14)如果要将文本框作为密码框使用时,应设置的属性为
A)Name
B)Caption
C)PasswordChar
D)Text
正确答案:
C
(15)有关程序代码窗口的说法错误的是
A)在窗口的垂直滚动条的上面,有一个"拆分栏",利用它可以把窗口分为两个部分,每个窗口显示代码的一部分
B)双击控件设计窗体即可打开程序代码窗口
C)在程序代码的左下角有两个按钮,可以选择全模块查看或者是过程查看
D)默认情况下,窗体的事件是Load
正确答案:
A
(16)VisualBasic中的数值可以用十六进制或八进制表示,十六进制数的开头符是&H,八进制数的开头符号是
A)$O
B)&O
C)$E
D)&E
正确答案:
B
(17)MsgBox函数的返回值的类型为
A)数值型
B)变体类型
C)字符串型
D)日期型
正确答案:
A
(18)使"计算机技术"在当前窗体上输出的语句是
A)Print"计算机技术"
B)Picture.Print"计算机技术"
C)Printer.Print"计算机技术"
D)Debug.Print"计算机技术"
正确答案:
A
(19)用来设置文本框有无滚动条的属性是
A)ScrollBars
B)MultiLine
C)SelText
D)SelLength
正确答案:
A
(20)当Esc键与单击该命令按钮作用相同时,此命令按钮的什么属性被设置为True?
A)Style
B)Default
C)Caption
D)Cancel
正确答案:
D
(21)在VisualBasic种,要使标签的标题栏靠右显示,则将其Alignment属性设置为
A)0
B)2
C)1
D)3
正确答案:
C
(22)属性BorderColor的作用是
A)设置直线颜色和形状边界颜色
B)设置直线或形状背景颜色
C)设置直线或形状边界线的线型
D)设置形状的内部颜色
正确答案:
A
(23)下面哪个程序段能够正确实现如果A
A)IfA A=-1 PrintA B)IfA PrintA A=-1: PrintA C)IfA A=1: PrintA Else A=-1: EndIf D)IfA A=-1 PrintA PrintA 考生答案: 正确答案: C (24)下列程序段的执行结果为 a=2 b=0 SelectCasea Case1 SelectCaseb Case0 Print"**0**" Case1 Print"**1**" EndSelect Case2 Print"**2**" EndSelect A)**0** B)**1** C)**2** D)0 正确答案: C (25)在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为File1的文件列表框,两个名称分虽为Label1、Label2,标题分别为空白和"共有文件"的标签。 编写程序,使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变化,并且在标签Label1中显示当前文件夹中文件的数量。 如图所示。 能够正确实现上述功能的程序是 A)PrivateSubDir1_Change() File1.Path=Dir1.Path EndSub PrivateSubDive1_Change() Dir1.Path=Drive1.Drive Label1.Caption=File1.ListCount EndSub B)PrivateSubDir1_Change() File.Path=Dir1.Path EndSub PrivateSubDive1_Change() Dir1.Path=Drive1.Drive Label1.Caption=File1.List EndSub C)PrivateSubDir1_Change() File1.Path=Dir1.Path Label1.Caption=File1.ListCount EndSub PrivateSubDrive1_Change() Dir1.Path=Drive1.Drive Label1.Caption=File1.ListCount EndSub (D)PrivateSubDir1_Change() File1.Path=Dir1.Path Label1.Caption=File1.ListCount EndSub PrivateSubDive1_Change() Dir1.Path=Drive1.Drive Label1.Caption=File1.List EndSub 正确答案: C (26)设有声明语句 OptionBase1 Dimb(-1To10,2To9,20)AsInteger 则数组b中全部元素的个数 A)2310 B)1920 C)1500 D)1658 正确答案: B (27)单击命令按钮,下列事件过程的执行结果为 PrivateSubCommand1_Click() DimxAsInteger,yAsInteger x=40: y=72 CallPtoP(x,y) Printx;y EndSub PublicSubPtoP(ByvalnAsInteger,ByValmAsInteger) n=n\10+2 m=m\10+2 EndSub A)0 8 B)40 72 C)4 50 D)78 50 正确答案: B (28)下列程序的执行结果为 PrivateSubCommand1_Click() DimpAsInteger,qAsInteger p=12: q=20 CallValue(p,q) Printp;q EndSub PrivateSubValue(ByValmAsInteger,ByValnAsInteger) m=m*2: n=n-5 Printm;n EndSub A)20 12 20 15 B)12 20 12 25 C)24 15 12 20 D)24 12 12 15 考生答案: 正确答案: C (29)在窗体上画一个命令按钮,然后编写如下程序: PrivateSubCommand3_Click() Cop2 Cop3 Cop4 EndSub SubCop(aAsInteger) StaticxAsInteger x=x+a Printx; EndSub 程序运行后,单击命令按钮,输出结果为 A)234 B)259 C)354 D)243 正确答案: B (30)有如下事件过程,单击命令按钮扣,输出结果为 PrivateSubCommand1_Click() Dimb%(1To4),j%,t# Forj=1To4 b(j)=j Nextj t=Tax(b()) Print"t=";t, EndSub FunctionTax(a()AsInteger) Dimt#,i% t=1 Fori=2ToUBound(A) t=t*a(i) Nexti Tax=t EndFunction A)t=18 B)t=24 C)t=30 D)t=32 正确答案: B (31)设在窗体上有一个文本框,然后编写如下的事件过程: PrivateSubText1_KeyDown(KeyCodeAsInteger,ShiftAsInteger) ConstAlt=4 ConstKey_F2=&H71 altdown%=(ShiftAndAlt)>0 f2down%=(KeyCode=Key_F2) Ifaltdown%Andf2down%Then Text1.Text="abl" EndIf EndSub 程序运行后,清除文本框中原有内容,如果按Shift+F2键,则在文本框中显示的是 A)Alt+F2 B)abl C)随机出几个数 D)不发生变化 正确答案: D (32)设已经在菜单编辑器中设计了窗体的快捷菜单,其顶级菜单为Bt,取消其"可见"属性,运行时,在以下事件过程中,可以使快捷菜单相应鼠标右键菜单的是 A)PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,_ XAsSingle,YAsSingle) IfButton=2ThenPopupMenuBt,2 EndSub B)PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,_ XAsSingle,YAsSingle) PopupMenuBt EndSub C)PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,_ XAsSingle,YAsSingle) PopupMenuBt,0 EndSub D)PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,_ XAsSingle,YAsSingle) If(Button=vbLeftButton)Or(Button=vbRightButton)ThenPopupMenuBt EndSub 正确答案: A (33)在窗体上画一个通用对话框,其Name属性为Cont,再画一个命令按钮,Name属性为Command1,然后编写如下事件过程: PrivateSubCommand1_Click() Cont.FileName="" Cont.Flags=vbOFNFileMustExist Cont.Filter="AllFiles|*.*" Cont.FilterIndex=3 Cont.DialogTitle="OpenFile" Cont.Action=1 IfCont.FileName=""Then MsgBox"Nofileselected" Else OpenCont.FileNameForInputAs#1 DoWhileNotEOF (1) Input#1,b$ Printb$ Loop EndIf EndSub 以下各选项,对上述事件过程描述错误的是 A)该事件过程用来建立一个Open对话框,可以在这个对话框中选择要打开的文件 B)选择后单击"打开"按钮,所选择的文件名即作为对话框的FileName属性值 C)Open对话框不仅仅用来选择一个文件,还可以打开、显示文件 D)过程中的"Cont.Action=1"用来建立Open对话框,它与Cont.ShowOpen等价 正确答案: C (34)已知使用Show方法的格式为: [窗体名称].Show[模式],如果要使窗体是"模态型"窗体,则"模式"值为 A)True B)0 C)1 D)False 正确答案: C (35)下面叙述不正确的是 A)对顺序文件中的数据操作只能按一定的顺序操作 B)顺序文件结构简单 C)能同时对顺序文件进行读写操作 D)顺序文件中只能知道第一个记录的位置 正确答案: C 二、填空题 (1)当线性表采用顺序存储结构实现存储时,其主要特点是【1】。 正确答案: 1.(逻辑结构中相邻的结点在存储结构中仍相邻) (2)软件工程的出现是由于【2】。 正确答案: 1.(软件危机的出现) (3)单元测试又称模块测试,一般采用【3】测试。 正确答案: 1.(白盒法) (4)数据库恢复是将数据库从【4】状态恢复到某一已知的正确状态。 正确答案: 1.(错误) (5)数据的基本单位是【5】。 正确答案: 1.(数据元素) (6)下列语句的输出结果是【6】。 PrintFormat$(6658.6,"000,000.00") 正确答案: 1.(006,658.60) (7)如果在D盘当前文件夹下已经存在名为PIC.dat的顺序文件,那么执行语句Open"D: \PIC.dat"ForAppendAs#1之后将【7】。 正确答案: 1.(在文件尾添加新内容) (8)在有下面一个程序段从文本框中输入数据,如果该数据满足条件,除以6余2,除以5余3,则输出,否则,将焦点定位在文本框中,并清除文本框的内容。 PrivateSubCommand1_Click() num=Val(Text1.Text) If【8】Then Printnum Else Text1.Text="" 【9】 EndIf EndSub 正确答案: 1.(numMod6=2AndnumMod5=3)2.(Text1.SetFocus) (9)下面的程序的作用是利用随机函数产生10个100~300(不包含300)之间的随机整数,打印其中7的倍数的数,并求它们的总和,请填空。 SubTOF() Randomize DimsAsDouble Dima(10)AsInteger Fori=0To9 【10】 Next Fori=0To9 If【11】Then Printa(i) s=s+a(i) 【12】 Nexti Print Print"S=";s EndSub 正确答案: 1.(a(i)=Int(Rnd*200+100))2.(a(i)Mod7=0)3.(EndIf) (10)下面的程序是计算给定函数的值,自变量x,y的值用InputBox函数输入,函数如下: f(x,y)= 程序不完整,请填空,将程序的补充完整。 OptionExplicit DimxAsSingle DimyAsSingle DimzAsSingle PrivateSubCommand1_Click() x=Val(InputBox("x=")) y=Val(InputBox("y=")) EndSub PrivateSubCommand2_Click() If【13】Then z=x^2+y^2 ElseIf【14】Then z=x^2-2*y^2 【15】 z=y^2-3*x^2 EndIf Form1.Print"当x,y的值为: ";x,y Form1.Print"f(x,y)的值为: ";z EndSub 正确答案: 1.(x>0Andy>0)2.(x<0Andy>0)3.(Else)
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 全国 计算机等级考试 二级 VB 模拟 试题
![提示](https://static.bdocx.com/images/bang_tan.gif)