【计算机类职业资格】二级VISUAL+BASIC笔试79及答案解析.doc
《【计算机类职业资格】二级VISUAL+BASIC笔试79及答案解析.doc》由会员分享,可在线阅读,更多相关《【计算机类职业资格】二级VISUAL+BASIC笔试79及答案解析.doc(15页珍藏版)》请在麦多课文档分享上搜索。
1、二级 VISUAL+BASIC 笔试 79 及答案解析(总分:90.00,做题时间:90 分钟)一、B选择题/B(总题数:35,分数:70.00)1.当 Style 属性为_时,组合框为简单组合框。(分数:2.00)A.0B.1C.2D.32.定义有 5 个整数型元素的数组,正确的语句是_。(分数:2.00)A.Dim a(4)As IntegerB.Option Base 1:Dim a(5)C.Dim a&(5)D.Dime a(5)As Integer3.在结构化方法中,软件功能分解属于软件开发中的_阶段。(分数:2.00)A.概要设计B.需求分析C.详细设计D.编程调试4.以下关于过程
2、及过程参数的描述中,错误的是_。(分数:2.00)A.过程的参数可以是控件名称B.用数组作为过程的参数时,使用的是“传地址”方式C.只有函数过程能够将过程中处理的信息传回到调用的程序中D.窗体可以作为过程的参数5.以下数据结构中,不属于线性数据结构的是_。(分数:2.00)A.队列B.线性表C.二叉树D.栈6.关于 Visual Basic 应用程序,正确的叙述是_。(分数:2.00)A.Visual Basic 程序是以线性方式顺序执行的B.Visual Basic 程序运行时,总是等待事件被触发C.Visual Basic 程序设计的核心是编写事件过程的程序代码D.Visual Basic
3、 的事件可以由用户随意定义,而事件过程是系统预先设置好的7.对于白箱(盒)测试用例的各设计准则,下列叙述中正确的是_。(分数:2.00)A.分支覆盖准则比语句覆盖准则严密B.条件覆盖要比分支覆盖优越,因此,条件覆盖能完全满足分支覆盖C.组合条件覆盖准则既能满足分支覆盖准则,也能满足条件覆盖准则。因此,组合条件覆盖准则是一种完全测试D.上述说法都不对8.已知 c:/1txt 是一个非空文件,其程序代码如下。 Private Sub Command1_Click() Dim MaxSize,NextChar,MyChat Open“c:/1txt“For Input As#1 MaxSize=LO
4、F(1) For NextChar=MaxSize To 1 Step-1 Seek #1,NextChar MyChar=Input(1,#1) Next NextChar Print EOF(1) Close #1 End Sub 程序运行后,单击命令按钮,其输出结果为_。(分数:2.00)A.TrueB.NullC.0D.False9.当 a1、b3、c5、d4 时,执行下面一段程序后,x 的值为_。 If ab Then If cd Then x=1 Else If ac Then If bd Then x=2 Else x=3 End If Else x=6 End If End I
5、f Else x=7 End If(分数:2.00)A.1B.2C.3D.610.以下程序运行后输出的结果是_。 For j=i To 4 GoSub s: m=m+1/n Next j Print m;n End s:n=j*(j+1) Return(分数:2.00)A.0.8,20B.0.75,12C.1.8,20D.1.75,1211.关于实体完整性规则,正确的叙述是_。(分数:2.00)A.实体完整性规则规定关系的主码不能为空B.实体完整性规则规定关系的候选码不能为空C.实体完整性规则规定关系的主属性不能为空D.实体完整性规则规定关系的外码不能为空12.在窗体上画一个命令按钮,名称为
6、Commandl,然后编写如下事件过程: Option Base 0 Private Sub Command1_Click() Dim city As Variant city=Array(“北京“,“上海“,“天津“,“重庆“) Print city(1) End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是_。(分数:2.00)A.空白B.错误提示C.北京D.上海13.如果要改变窗体的标题,则需要设置的属性是_。(分数:2.00)A.CaptionB.NameC.BackColorD.BorderStyle14.程序运行后,在窗体上单击鼠标,此时窗体不会接收到的事件是_。(
7、分数:2.00)A.MouseDownB.MouseUpC.LoadD.Click15.以下叙述中,正确的一条是_。(分数:2.00)A.任何时候都可以使用标准工具栏的“菜单编辑器”按钮打开菜单编辑器B.任何时候都可以使用“工具”菜单下的“菜单编辑器”命令打开菜单编辑器C.只有当某个窗体为当前活动窗体时,才能打开菜单编辑器D.只有当代码窗口为活动窗口时,才能打开菜单编辑器16.在数据库技术中,面向对象数据模型是一种_。(分数:2.00)A.概念模型B.结构模型C.物理模型D.形象模型17.软件工程包括软件开发技术和软件工程管理。属于软件工程管理内容的是_。(分数:2.00)A.软件工具B.软件
8、工程环境C.开发方法D.软件工程经济学18.为取名为 MenuColor 的菜单项添加标记的语句是_。(分数:2.00)A.MenuColor,PopupTrueB.MenuColoEnabledTrueC.MenuColoVisibleTrueD.MenuColoCheckedTrue19.软件测试的内容包括: 、有效性测试 、集成测试 、验收测试 、系统测试 、单元测试 正确的测试顺序是_。(分数:2.00)A.、B.、C.、D.、20.假定有一个菜单项取名为 Menuhem,为了在运行时使该菜单项失效(变灰),应使用的语句是_。(分数:2.00)A.MenuIteEnabled=Fals
9、eB.MenuIteEnabledTrueC.MenuIteVisibleTrueD.MenuIteVisibleFalse21.菜单编辑器窗口有 3 个区域,下列不属于菜单编辑器的是_。(分数:2.00)A.菜单项属性区B.菜单项显示区C.菜单在线演示区D.菜单编辑区22.确定复选框是否选中,应该访问的属性是_。(分数:2.00)A.StyleB.ValueC.SelectedD.Checked23.在窗体上画一个名称为 Commandl 的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() For n=1 To 20 If n Mod 30 Then
10、 m=m+n/3 Next n Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是_。(分数:2.00)A.15B.18C.21D.2424.在窗体上画 3 个单选按钮,组成一个名为 chkOption 的控件数组。用于标识各个控件数组元素的参数是_。(分数:2.00)A.TagB.IndexC.ListIndexD.Name25.在包含 1000 个元素的线性表中实现如下各运算,_所需的执行时间最长。(分数:2.00)A.线性表按顺序方式存储,在线性表的第 10 个结点后面插入一个新结点B.线性表按链接方式存储,在线性表的第 10 个结点后面插入一个新结点C.
11、线性表按顺序方式存储,删除线性表的第 990 个结点D.线性表按链接方式存储,删除指针 P 所指向的结点26.下列叙述中,错误的是_。(分数:2.00)A.一种数据的逻辑结构可以有多种存储结构B.数据的存储结构与数据处理的效率无关C.数据的存储结构与数据处理的效率密切相关D.数据的存储结构在计算机中所占的空间不一定是连续的27.以下程序运行后输出的结果是_。 Private Sub Form _Click() a=0 For j=1 To 15 a=a+j Mod 3 Next j Print a End Sub(分数:2.00)A.10B.15C.80D.10028.运行以下程序时,由键盘为
12、变量 load 输入的数据为 20,输出结果为_。 Private Function Wei(load As Integer),Money As Single If load20 Then Money=load/2 Else Money=20+load End if Wei=Money End Function Private Sub Form _Click() Dim load As Integer,fee As Single load=InputBox(“请输入一个数:”) fee=Wei(loaD) Print fee End Sub(分数:2.00)A.10B.20C.30D.4029
13、.在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim i As Integer,n As Integer For i=0 To 50 i=i+3 n=n+1 If i10 Then Exit For Next Text1Text=Str(n) End Sub 程序运行后,单击命令按钮,在文本框中显示的值是_。(分数:2.00)A.2B.3C.4D.530.以下叙述中,正确的是_。(分数:2.00)A.窗体的 Name 属性指定窗体的名称,用来标识一个窗体B.窗体的 Nam
14、e 属性的值是显示在窗体标题栏中的文本C.可以在运行期间改变对象的 Name 属性的值D.对象的 Name 属性值可以为空31.在窗体上面画一个命令按钮,然后编写如下事件过程,运行程序,单击命令按钮,其输出结果是_。 Option Base 1 Private Sub Command1_Click() Dim a a=Array(1,2,3,4) j=1 For i=4 To 1 Step-1 s=s+a(i)*j j=j*10 Next i Print s End Sub(分数:2.00)A.4321B.12C.34D.123432.下面程序的运行结果是_。 Dim a,i,s a=Arra
15、y(“6“,“5“,“a“,“b“,“2“,“1“) s=0 i=0 Dw While a(i)=“0“ And a(i)=“9“ s=10* s+a(i)-“0“ Print s i=i+2 Loop(分数:2.00)A.12ba56B.652C.6D.6233.在设计阶段,当双击窗体上的某个控件时,所打开的窗口是_。(分数:2.00)A.工程资源管理器窗口B.工具箱窗口C.代码窗口D.属性窗口34.以下程序段中,循环体执行的次数是_。 i=0 : j=1 While i=j+1 Print i; i=i+2;i=j-1 Wend(分数:2.00)A.1 次B.2 次C.3 次D.无法确认3
16、5.以下_不是队列的基本操作。(分数:2.00)A.从队尾插入一个新元素B.从队列中删除第 i 个结点C.判断一个队列是否为空D.读取对头元素的值二、B填空题/B(总题数:10,分数:20.00)36.一棵二叉树的结点数为 33,其最大的深度为U 【1】 /U,最小的深度为U 【2】 /U。(分数:2.00)填空项 1:_37.设一棵完全二叉树共有 700 个结点,则在该二叉树中有U 【3】 /U个叶子结点。(分数:2.00)填空项 1:_38.软件文档分为用户文档和系统文档,描述系统设计、实现和测试的文档属于U 【4】 /U文档。(分数:2.00)填空项 1:_39.数据库模型提供了两层映像
17、功能,内模式到模式间的映像使得数据存储结构改变时,逻辑结构不变,因而相应的应用程序也不必改变,这是数据库的U 【5】 /U独立性。(分数:2.00)填空项 1:_40.单击窗体上的命令按钮 Command1,程序的输出为U 【6】 /U。 Private Sub Command1_Click() a=“AbC“ b=“dEF“ c=UCase(a) +LCase(b) Print Asc(c) End Sub(分数:2.00)填空项 1:_41.执行下列语句后,程序的输出结果为U 【7】 /U。 x=6: y=2: z=5 Print z=x-y(分数:2.00)填空项 1:_42.在窗体 f
18、orm1 上有一个驱动器列表控件 Drivel,一个目录列表控件 Dirl,一个文件列表控件 File1,一个富文本控件 Richtexbox1。要求程序运行以后,用户可以利用。Drivel 选择不同驱动器,同时 Dirl中显示当前选中的驱动器的目录,用户利用 Dirl 选择文件所在的文件夹,在 Filel 控件中将显示当前选中的文件夹下的文件,用户选中其中某个文件(假设为文本文件),则该文件的内容显示在控件Richtexboxl 中。补充相应的语句,使之完成所述的功能。 Private Sub Dirl_Change() U 【8】 /U End Sub Private Sub Drive1
19、_Change() U 【9】 /U End Sub Private Sub Filel _Click() Dim fname AS String IfU 【10】 /UThen fname=FilelPath & FilelFileName Else fname=FilelPath& “/“ & FilelFileName End If RichTextBox1LoadFile(fname) End Sub(分数:2.00)填空项 1:_43.以下所列程序的功能是:在窗体上有一个文本框控件,程序运行后,用户可以利用鼠标左键来拖动该文本框控件(注意:拖动时,文本框移动的距离和方向由鼠标指针移动
20、的距离和方向来确定),按下鼠标右键则可以在文本框中显示出当前文本控件的位置。 Public yx As Integer Public yy As Integer Private Sub Form_ MouseMove(Button AS Integer,Shift As Integer,_ X As Single,Y As Single) If Button=1 Then Text1Left=U 【11】 /U Text1Top=U 【12】 /U End If End Sub Private Sub Form_ MouseDown (Button As Integer,Shift As In
21、teger,_ X As Single,Y As Single) IfU 【13】 /UThen yx=Text1Left-X yy=Text1Top-Y End If If Button=2 Then Text1Text=“X 坐标:”+Str(Text1Left)+“Y 坐标:”+Str(Text1Top) End If End Sub(分数:2.00)填空项 1:_44.Visual Basic 中有一种控件组合了文本框和列表框的特性,这种控件是U 【14】 /U。(分数:2.00)填空项 1:_45.在窗体上画一个通用对话框,其名称为 CommandDialog1,再画一个命令按钮,其
22、名称为 Command1。程序运行时,单击命令按钮,在对话框内只允许显示文本文件。将以下程序补充完整。 Private Sub Command1_Click() CommandDialog1Filter=U 【15】 /U CommandDialog1ShowOpen End Sub(分数:2.00)填空项 1:_二级 VISUAL+BASIC 笔试 79 答案解析(总分:90.00,做题时间:90 分钟)一、B选择题/B(总题数:35,分数:70.00)1.当 Style 属性为_时,组合框为简单组合框。(分数:2.00)A.0B.1 C.2D.3解析:解析 Style 属性决定组合框的类型
23、和行为,它的值为 0、1 或 2。当 Style 属性为 0(默认值)时,组合框为下拉式组合框;当 Style 属性为 1 时,组合框为简单组合框;当 Style 属性为 2 时,组合框为下拉式列表框。2.定义有 5 个整数型元素的数组,正确的语句是_。(分数:2.00)A.Dim a(4)As Integer B.Option Base 1:Dim a(5)C.Dim a&(5)D.Dime a(5)As Integer解析:解析 在选项 B 中,语句 Option Base l 不能放在过程中与 Dim 语句在一起;选项 C 中,使用了多余的字符“&”;选项 D 中的关键字错误。选项 A
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
5000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 职业资格 二级 VISUALBASIC 笔试 79 答案 解析 DOC
