【计算机类职业资格】二级VISUAL+BASIC笔试22及答案解析.doc
《【计算机类职业资格】二级VISUAL+BASIC笔试22及答案解析.doc》由会员分享,可在线阅读,更多相关《【计算机类职业资格】二级VISUAL+BASIC笔试22及答案解析.doc(15页珍藏版)》请在麦多课文档分享上搜索。
1、二级 VISUAL+BASIC 笔试 22 及答案解析(总分:94.00,做题时间:90 分钟)一、B选择题/B(总题数:35,分数:70.00)1.在窗体上画一个名称为 Command1 的命令按钮,然后编写如下事件过程: Private SubCommand1_Click() Dim num As Integer num=1 DO Until mum6 Print num; num=num+2.4 Loop End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是 _。(分数:2.00)A.1 3.4 5.8B.1 3 5C.1 4 7D.无数据输出2.在窗体上画一个名称为 Comm
2、onDialogl 的通用对话框,一个名称为 Command1 的命令按钮。要求单击命令按钮时,打开一个保存文件的通用对话框。该窗口的标题为 Save,默认文件名为 SaveFile,在“文件类型”栏中显示*.txt。则能够满足上述要求的程序是 _。(分数:2.00)A.Private Sub Command Click() CommonDialogFileName“SaveFile“ CommonDialogFilte“All Files|*.*|(*.tx|*.txt|(*.do |*.doc“ CommonDialogFilterIndex2 CommonDialogDialogTitl
3、e“Save“ CommonDialogAction2 End SubB.Private Sub Commandl_Click() CommonDialog FileName=“SaveFile“ CommonDialog Filter= “All Files| *. * | (*. tx*. txt| *. doc| *. doc“ CommonDialog FilterIndex= 1 ComonDialog DialogTitle = “Save“ CommonDialog Action= 2 End SubC.Private Sub Cmmandl_Click() CommonDial
4、og FileName= “Save“ CommonDialog FiLter=“All Files | *. * |(*. tx|*. txt|(*. do |*. doc“ CommonDialog FilterIndex= 2 CommonDialog DialogTitle = “SaveFile“ CommonDialog Action= 2 End SubD.Private Sub Commandl_Click() CommonDialog FileName = “SaveFile“ CommonDialog Filter= “All Files|*. *|(*. tx|*. tx
5、t| (*. do |*. doc“ CommonDialog FilterIndex=1 CommonDialog DialogTitle= “Save“ CommonDialog Action=1 End Sub3.要得到字体对话框中用户所选择的字体颜色的属性是 _。(分数:2.00)A.ColorB.ForeColorC.FontColorD.ShowColor4.下列数据结构中,能应用二分查找的是 _。(分数:2.00)A.有序线性链表B.有序顺序表C.顺序存储的栈D.顺序存储的队列5.在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click
6、() x=0 Do Until x=-1 a=InputDox(“请输入 a 的值“) a=Val(A) b=InputBox(“请输入 b 的值“) b=Val(B) x=InputBox(“请输入 x 的值“) x=Val(x) a=a+b+x Loop Print a End sub 程序运行后,单击命令按钮,依次在输入对话框中输入 10、8、9、2、11、-1,则输出结果为 _。(分数:2.00)A.15B.14C.13D.126.在窗体上画一个文本框,然后编写如下事件过程。当该程序运行后,如果在键盘上输入字母 e,则文本框中显示的内容为 _。 Private Sub Text1_Ke
7、yPress(KeyAscii As Integer) Dim char as String char=Chr(KeyAscii) KeyAscii=Asc(UCase(char) Text1.Text=String(5,KeyAscii) End Sub(分数:2.00)A.eeeeeB.EEEEEC.eeeeeeD.EEEEEE7.假设在窗体 Form1 上画一通用对话框控件 CommonDialogl,要建立“打开文件”对话框,为了使得该对话框的标题显示为“打开文件”,那么可以实现该功能的语句是 _。(分数:2.00)A.CommonDialogDialogTitle“打开文件”B.Co
8、mmonDialogDialogTitle(“打开文件”)C.CommonDialogFileTitle“打开文件”D.CommonnalogFileTitle(“打开文件”)8.用于显示弹出式菜单的方法名是 _。(分数:2.00)A.ShowPopupMenuB.ShowMenuC.ListPopupMenuD.PopupMenu9.下列属性中,决定在程序运行期间列表框或组合框的选项是否按字母顺序排列显示的属性是 _。(分数:2.00)A.ListIndexB.TextC.ListCountD.Sorted10.设有以下循环结构: Do 循环体 Loop While条件 则以下叙述中错误的是
9、 _。(分数:2.00)A.若“条件”是一个为 0 的常数,则一次也不执行循环体B.“条件”可以是关系表达式、逻辑表达式或常数C.循环体中可以使用 Exit Do 语句D.如果“条件”总是为 True,则不停地执行循环体11.关系模型要求关系必须是规范化的,即要求关系模式必须满足一定的条件,这些规范条件中最基本的一条就是 _。(分数:2.00)A.每一个分量是一个不可分的数据项,即不允许表中表结构B.二维表中各列的宽度必须完全相等C.二维表中的各行和各列的顺序不能交换D.属性名(字段名)要么全部使用汉字,要么全部使用字母12.在过程内用 Dim 语句声明的变量只能在本过程中使用,而其他的过程不
10、可访问,这种变量称之:为 _。(分数:2.00)A.局部变量B.全局变量C.静态变量D.窗体/模块级变量13.以下选项中,与软件产品运行有关的质量特征是 _。(分数:2.00)A.可测试性B.适应性C.可重用性D.健壮性14.一个工程中包含两个名称分别为 Form1、Fort2 的窗体,一个名称为 mdlFunc 的标准模块。假定在 Form1、Form2 和 mdlFune 中分别建立了自定义过程,其定义格式为: Form1 中定义的过程; Private Sub frmFunctionl() . End Sub Form2 中定义的过程: Public Sub frmFunction2()
11、 . End Sub mdlFunc 中定义的过程: Public SubmdlFunction() . End Sub 在调用上述过程的程序中,如果不指明窗体或模块的名称,则以下叙述中正确的是 _。(分数:2.00)A.上述 3 个过程都可以在工程中的任何窗体或模块中被调用B.frmFunction2 和 mdlFunction 过程能够在工程中各个窗体或模块中被调用C.上述 3 个过程都只能在各自被定义的模块中调用D.只有 mdlFunction 过程能够被工程中各个窗体或模块调用15.以下程序运行后的输出结果是 _。 Sub add(x,y) x=x+y Print “x=“;x;“,y
12、=“;y End Sub Private Sub Command1_Click() x=1 y=1 Call add(x),(y) Print“x=“; x;“,y=“;y End Sub(分数:2.00)A.x=1,y=1 x=2,y=2B.x=2,y=1 x=1,y=1C.x=1,y1 x=1,y=1D.x=2,y=1 x=2,y=116.下列叙述中,正确的是 _。(分数:2.00)A.用 E-R 图能够表示实体集之间一对一的联系、一对多的联系、多对多的联系B.用 E-R 图只能表示实体集之间一对一的联系C.用 E-R 图只能表示实体集之间一对多的联系D.用 E-R 图表示的概念数据模型只
13、能转换为关系数据模型17.目录列表框的 Path 属性的作用是 _。(分数:2.00)A.显示当前驱动器或指定驱动器上的路径B.显示当前驱动器或指定驱动器上的某目录下的文件名C.显示根目录下的文件名D.只显示当前路径下的文件18.在对象的 MouseDown 和 MouseUp 事件过程中,当 Button 参数的值为 1、2、4 时,分别代表按下鼠标的 _。(分数:2.00)A.左键、中间键和右键B.左键、右键和中间键C.左键、右键和同时按下左右键D.中间键、左键和右键19.在关系数据库中,用来表示实体之间联系的是 _。(分数:2.00)A.树结构B.网结构C.线性表D.二维表20.以下关于
14、队列的叙述中,不正确的是 _。(分数:2.00)A.队列的特点是先进先出B.队列既能用顺序方式存储,也能用链接方式存储C.队列适用于二叉树对称序周游算法的实现D.队列适用于树的层次次序周游算法的实现21.在 Visual Basic 中,要使一个窗体从内存中释放,应该使用的语句是 _。(分数:2.00)A.ShowB.UnloadC.HideD.Load22.为了暂时关闭计时器,应把该计时器的某个属性设置为 False,这个属性是 _。(分数:2.00)A.VisibleB.TimerC.EnabledD.Interval23.在程序运行期间,如果拖动滚动条上的滑块,则触发的滚动条事件是 _。
15、(分数:2.00)A.MoveB.ChangeC.ScrollD.Get Focus24.设 a=3,b=5,则以下表达式值为真的是 _。(分数:2.00)A.a=b And b10B.(a Or(b0)C.(a0)Eqv(b0)D.(-3+5 And(b0)25.软件需求说明书是需求分析阶段的最后成果,以下 _ 是其应包括的内容。 、数据描述 、功能描述 、性能描述 、文件结构(分数:2.00)A.和B.和C.和D.、和26.系统软件一般包括 _。 、服务性程序 、语言处理程序 、操作系统 、数据库管理系统(分数:2.00)A.、和B.、和C.、和D.全部27.数据结构分为逻辑结构和存储结构
16、,下列数据结构中不属于存储结构的是 _。(分数:2.00)A.线性链表B.二叉链表C.栈与队列D.循环队列28.在窗体上画一个命令按钮,然后编写如下过程,程序运行后,单击命令按钮,在输入对话框中输入234,输出结果为 _。 Function fun(ByVal num As Long) As Long Dim k As Long k=1 mum=Abs(num) Do While num k=k*(num Mod 10) num=num/10 Loop fun=k End Function Private Sub Command1_Click() Dim n As Long Dim r As
17、Long n=InputBox(“请输入一个数“) n=CLng(n) r=fun(n) Print r End Sub(分数:2.00)A.20B.24C.9D.2829.以下选项中,不属于一个 Visual Basic 应用程序组成模块的是 _。(分数:2.00)A.标准模块B.窗体模块C.类模块D.启动模块30.以下声明语句中,错误的是 _。(分数:2.00)A.Const varl123B.Dim var2=ABCC.DefInt a-zD.Static var3 As Integer31.在窗体上有一个文本框控件,名称为 TxtTime 一个计时器控件,名称为 Timer1,要求每
18、1 秒钟在文本框中显示一次当前的时间,程序为: Private Sub Timer1 _() TxtTime. text=Time End Sub 在下划线上应填入的内容是 _。(分数:2.00)A.EnabledB.VisibleC.IntervalD.Timer32.无论什么控件,都有一个共同的属性,这个属性是 _。(分数:2.00)A.NameB.CaptionC.TextD.Font33.软件测试一般是通过设计测试实例来实现的,它又分为黑箱法和白箱法两类,经验表明,在黑箱测试可选的多种方法中,往往首先使用的是 _。(分数:2.00)A.等价分类法B.边界值分析法C.因果图法D.错误推断
19、法34.假设有文件列表框 File1、驱动器列表框 Drive1 和目录列表框 Dir1,为了使三者同步,在下列语句中,正确的语句是 _。 File1.Path=Dir1.Path File1.FileName=Dirl.FileName Dir1.Path=Drive1.Drive Dir1.Path=Drive1.Path(分数:2.00)A.和B.和C.、和D.全部35.用 Close 语句可以关闭一个已经用完不再使用的文件,当该语句不带任何参数时,它的功能是 _。(分数:2.00)A.可以关闭所有已打开的文件B.只能关闭最近打开的那个文件C.可以关闭最近打开的两个文件D.语法错误二、B
20、填空题/B(总题数:12,分数:24.00)36.m 阶 B+树的每个结点至多有U 【1】 /U个子女。(分数:2.00)填空项 1:_37.对于一个具有 n 个结点的单链表,已知 p 所指结点后插入一个新结点的时间复杂度是 O(1);在给定值为 x 的结点后插入一个新结点的时间复杂度是U 【2】 /U。(分数:2.00)填空项 1:_38.软件测试分为功能测试和结构测试两类,路径测试是属于U 【3】 /U的一种。(分数:2.00)填空项 1:_39.一个完整的程序必须完成 3 个层次的过程,它们分别是编码、测试和U 【4】 /U。(分数:2.00)填空项 1:_40.数据库模型提供了两个映像
21、功能,第一种映像使得数据存储结构改变时,逻辑结构不变,因而相应的应用程序也不变,这就是它们的U 【5】 /U独立性。(分数:2.00)填空项 1:_41.在程序运行期间,增加和删除列表框(或组合框)的方法是 Addltem 和U 【6】 /U。(分数:2.00)填空项 1:_42.为了在运行时把图形文件 piefile.jpg 装入图片框对象 Picture1 之中,应该使用的语句为U 【7】 /U。(分数:2.00)填空项 1:_43.如果单选按钮是“选中”的,即单选按钮中间有一个圆点,那么该单选按钮的 Value 属性值等于U 【8】 /U;反之,如果单选按钮没有被选中,其 Value 属
22、性值等于U 【9】 /U。(分数:2.00)填空项 1:_44.下面程序的功能是:计算 110 之间奇数之和及偶数之和。 Dim a,b,c,i a=0 c=0 For i=0 To 10 Step 2 a=i+a U 【10】 /U c=b+c Next i Print “偶数之和=“;a Print“奇数之和=“ ;c-11(分数:2.00)填空项 1:_45.以下程序段的输出结果是U 【11】 /U。 num=0 While num=2 num=num+1 Print num; Wend(分数:2.00)填空项 1:_46.以下程序的功能是:从键盘上输入若干个学生的考试分数,当输入负数时
23、结束输入,然后输出其中的最高分数和最低分数。在【12】和【13】处填入适当的内容,将程序补充完整。 Private Sub Form_Click() Dim x As Single,amax As Single,amin As Single x=InputBox(“Enter a score“) amax=x amin=x Do WhileU 【12】 /U If xamax Then amax=x End If IfU 【13】 /UThen amin=x End If x=InputBox(“Enter a score“) Loop Print“Max=“;amax,“Min=“;amin
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
5000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 职业资格 二级 VISUALBASIC 笔试 22 答案 解析 DOC
