【计算机类职业资格】二级VISUAL+BASIC笔试-79及答案解析.doc
《【计算机类职业资格】二级VISUAL+BASIC笔试-79及答案解析.doc》由会员分享,可在线阅读,更多相关《【计算机类职业资格】二级VISUAL+BASIC笔试-79及答案解析.doc(24页珍藏版)》请在麦多课文档分享上搜索。
1、二级 VISUAL+BASIC 笔试-79 及答案解析(总分:100.00,做题时间:90 分钟)一、选择题(总题数:35,分数:70.00)1.窗体上没有任何控件,有下列程序:Option Base 1Private Sub Form_KeyPress(KeyAscii As Integer)a=Array(5,2,7,6,9)x=a(1)y=1If KeyAscii=13 ThenFor i=2 To 5If a(i)m1 Thenx=a(i)y=iEnd IfNext iEnd IfPrint x;yEnd Sub执行程序后,按下回车键后输出结果为_。(分数:2.00)A.5 1B.9
2、5C.2 2D.7 32.在窗体上画一个名称为 Command1 的命令按钮,然后编写如下事件过程:Private Sub Command1_Click( )Dim a(4)As Integer,x As Integer,sum As Integern=4:sum=0a(1)=1For k=0 To n-1For i=1 To k+1x=k+2-ia(x)=a(x)+a(x-1)If xn-k Then Exit Forsum=sum+a(x)Next iNext kPrint sumEnd Sub程序运行后,单击命令按钮,则窗体上显示的内容是_。(分数:2.00)A.5B.6C.8D.113
3、.下列关于栈的叙述中正确的是_。(分数:2.00)A.在栈中只能插入数据B.在栈中只能删除数据C.栈是先进先出的线性表D.栈是先进后出的线性表4.如果 Tab 函数的参数小于 1,则打印位置在第_列。(分数:2.00)A.0B.1C.2D.35.在面向对象方法中,一个对象请求另一对象为其服务的方式是通过发送_。(分数:2.00)A.调用语句B.命令C.口令D.消息6.当利用 Line 方法进行添加图时,以下正确的说法是_。(分数:2.00)A.有 7 种不同的线型,而且不管线宽多少都可以绘制虚线/点划线/点线B.使用 Line(100,100)-(1000,1200)和 Line(100,10
4、0)-Step(900,1100)将绘制两条相同位置的直线C.可利用 Line 方法添加矩形,如 Line(300,300)-(2000,2000),BFD.可利用 Line 方法添加矩形,如 Line(300,300)-(2300,2300),B+F7.下列叙述中,错误的是_。(分数:2.00)A.数据的存储结构与数据处理的效率密切相关B.数据的存储结构与数据处理的效率无关C.数据的存储结构在计算机中所占的空间不一定是连续的D.一种数据的逻辑结构可以有多种存储结构8.编写如下通用过程:Sub Proc(x As Single,y As Single)t=xX=t/yy=t Mod yEnd
5、Sub在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click( )Dim a As SingleDim b As Singlea=5b=4Proc a,bPrint a,bEnd Sub程序运行后,如果单击命令按钮,则输出结果为_。(分数:2.00)A.5 4B.1.25 1C.4 5D.1.25 59.运行下列程序:Private Sub Command1_Click( )x=0Do While x10x=x*x+1y=y+xLoopMsgBox yEnd Sub单击 Command1 命令按钮后,则弹出的消息对话框中显示_。(分数:2.00)A.
6、5B.8C.26D.3410.使用 Redim Preserve 可以改变数组的_。(分数:2.00)A.最后一维的大小B.第一维的大小C.所有维的大小D.改变维数和所有维的大小11.编写如下两个事件过程:Private Sub Form_KeyDown(KeyCode As Integer,ShiftAs Integer)Print Chr(Keycode)End SubPrivate Sub Form_KeyPress(KeyAscii As Integer)Print Chr(KeyAscii)End Sub在一般情况下(即不按住 Shift 键和锁定大写),运行程序,如果按“A”键,则
7、程序的输出是_。(分数:2.00)A.AAB.aAC.AaD.aa12.在设计阶段,当双击窗体上的某一个文本框控件时,系统将在代码窗口中显示该文本框控件的_事件过程模板。(分数:2.00)A.ClickB.DblClickC.ChangeD.GotFocus13.在窗体上画一个命令按钮,然后编写如下代码:Private Sub Command1_Click( )a&=InputBox(“请输入第一个数“)b&=InputBox(“请输入第二个数“)Print b&+a%End Sub程序运行后,单击命令按钮,在两个输入对话框中先后输入 12345 和 54321,程序的输出结果是_。(分数:2
8、.00)A.66666B.54321 12345C.1234554321D.出错14.下列程序是将两个文本框(text1 和 text2)的内容进行组合,组合后的结果在图片框(Pic1)显示出来。Private Sub Command1_Click( )Dim s1 As String, s2 As Strings1=Text1.Texts2=Text2.TextFor i=Len(s1)To 1 Step-1s3=s3+Mid(s1,i,1)+Mid(s2,i,1)Next iPic1.Print s3End Sub程序运行后,在 Text1 文本框中输入“ABCDE”,在Text2 文本框
9、中输入“12345”单击命令按钮,则在 Pic1 图片框中显示的内容是_。(分数:2.00)A.E5D4C3R2A1B.ABCDE12345C.12345ABCDED.A182C3D4E515.数据流图用于抽象描述一个软件的逻辑模型,数据流图由一些特定的图符构成。下面图符号不属于数据流图的是_。(分数:2.00)A.控制流B.加工C.数据存储D.源和潭16.在窗体上画一个名称为 Command1 的命令按钮,然后编写如下事件过程:Private Function funl(n As Integer)As IntegerDim k As IntegerIf n=1 Thenk=1Elsek=1+
10、fun1(n-1)*2End Iffun1=kEnd FunctionPrivate Sub Coraraand1_Click( )Dim m As Integer, x As Integerx=4m=fun1(x)Print mEnd Sub程序运行后,单击命令按钮,则窗体上显示的内容是_。(分数:2.00)A.4B.6C.9D.1517.以下关于多重窗体程序的叙述中,错误的是_。(分数:2.00)A.用 Hide 方法不但可以隐藏窗体,而且能清除内存中的窗体B.在多重窗口程序中,各窗体的菜单是彼此独立的C.在多重窗口程序中,可以根据需要指定启动窗体D.对于多重窗口程序,需要单独保存每个窗体
11、18.阅读程序:Sub Form_Click( )a=10:b=15:c=20:d=25Print a;Spc(5);b;Spc(7);cPrint a;Space(8);b;Space(5);cPrint c;Spc(1);“+“;Spc(1);d;Print Spc(1);“=“;Spc(1);c+dEnd Sub运行上面的程序,单击窗体后,第三行输出结果是_。(分数:2.00)A.20+25=45B.20+25=45C.10 15 20D.20 25 4519.假设线性表的长度为 n,则在最坏情况下,冒泡排序法的时间复杂度是_。(分数:2.00)A.log2nB.nlog2nC.n(n-
12、1)D.n(n-1)/220.当拖动滚动条中的滚动块时,将触发的滚动条的事件是_。(分数:2.00)A.MoveB.ChangeC.ScrollD.SetFocus21.在窗体上画一个命令按钮和一个标签,其名称分别为 Command1 和 Labe11,然后编写如下事件过程:Private Sub Command1_Click( )Counter=0For i=1 To 4For j=8 To 1 Step-2Counter=Counter+1Next jNext iLabe11.Caption=Str(Counter)End Sub程序运行后,单击命令按钮,标签中显示的内容是_。(分数:2.
13、00)A.11B.12C.16D.2022.下列程序运行后会出现错误的提示为_。Private Sub Command1_Click( )Dim i As IntegerDim xx=Array(2,3,4,5,6,7)For Each i In xPrint i;Next iEnd Sub(分数:2.00)A.数组的下标超界B.For Each 数组的控制变量必须为变体变量C.关键字 Each 的位子不对D.x 应该定义成数组23.执行语句 s=Len(Mid(“study hard“,1,5)后,s 的值是_。(分数:2.00)A.studyB.hardC.5D.1024.数据库技术处于数
14、据库系统阶段的时间段是 20 世纪_。(分数:2.00)A.60 年代后期到现在B.60 年代到 80 年代中期C.80 年代以前D.70 年代以前25.为了保存一个 Visual Basic 应用程序,下列说法中正确的是_。(分数:2.00)A.只保存窗体模块文件(.frm)B.只保存工程文件(.vbp)C.分别保存工程文件和标准模块文件(.has)D.分别保存工程文件、窗体文件和标准模块文件26.数据库设计包括两个方面的设计内容,它们是_。(分数:2.00)A.概念设计和逻辑设计B.模式设计和内模式设计C.内模式设计和物理设计D.结构特性设计和行为特性设计27.以下关系表达式中,其值为 F
15、alse 的是_。(分数:2.00)A.“Base“Basic“B.“List1“Command1“C.“CASE“=UCase(“case“)D.“Integer“Int“28.为了提高测试的效率,应该_。(分数:2.00)A.随机地选取测试数据B.取一切可能的输入数据作为测试数据C.在完成编码以后制定软件的测试计划D.选择发现错误可能性大的数据作为测试数据29.Visual Basic 程序中分隔各语句的字符是_。(分数:2.00)A.B.:C./D._30.某线性表最常用的运算是插入和删除,插入运算是指在表尾插入一个新元素。删除运算是指删除表头第一个元素,那么采用_存储方式最节省运算时间
16、。(分数:2.00)A.仅有尾指针的单向循环链表B.仅有头指针的单向循环链表C.单向链表D.顺序存储31.已知一棵二叉树的前序遍历为 ABDECF,中序遍历为 DBEAFC,则对该树进行后序遍历得到的序列为_。(分数:2.00)A.DEBAFCB.DEFBCAC.DEBCFAD.DEBFCA32.为了取消窗体的最小化功能,需要把它的一个属性设置为 False,这个属性是_。(分数:2.00)A.ControlBoxB.MinButtonC.EnabledD.MaxButton33.在窗体上画一个名称为 Command1 的命令按钮,然后编写如下事件过程:Private Sub sub1(ByV
17、al x As Integer,ByVal y As Integer,ByVal z As Integer)z=x*x+y*yEnd SubPrivate Sub Command1_Click( )Dim a As Integera=8Call sub1(1,2,(分数:2.00)A.&nb34.以下叙述正确的是_。(分数:2.00)A.Select Case 语句中的测试表达式可以是任何形式的表达式B.Select Case 语句中的测试表达式只能是数值表达式或字符串表达式C.在执行 Select Case 语句时,所有 Case 子句均按出现的次序被顺序执行D.如下 Select Case
18、 语句中的 Case 表达式是错误的 Splect Case xCase 1 to 10End Select35.窗体文件的扩展名是_。(分数:2.00)AfrmBvbpCbasDfrx二、填空题(总题数:12,分数:30.00)36.某二叉树中度为 2 的结点有 18 个,则该二叉树中有 1 个叶子结点。(分数:2.00)填空项 1:_37.在长度为 n 的有序线性表中进行二分法查找,在最坏情况下,需比较的次数为 1。(分数:2.00)填空项 1:_38.结构化程序没计方法的主要原则可以概括为自顶向下、逐步求精、_和限制使用 goto 语句。(分数:2.00)填空项 1:_39.诊断和改正程
19、序中错误的工作通常称为 1。(分数:2.00)填空项 1:_40.数据模型按不同的应用层次分为 3 种类型,它们是 1 数据模型、逻辑数据模型和物理数据模型。(分数:2.00)填空项 1:_41.Visual Basic 中的控件分为 3 类,它们是 1、ActiveX 控件和可插入对象。(分数:2.00)填空项 1:_42.VB6 识别对象靠的是对象的 1 属性。(分数:2.00)填空项 1:_为了显示一个窗体,所使用的方法为 (8) ;而为了隐藏一个窗体,所使用的方法为 (9) 。(分数:4.00)填空项 1:_填空项 1:_43.在 VB 中,用于文件复制的命令是 1。(分数:2.00)
20、填空项 1:_斐波那契(Fibonacci)数列的构成规律是:数列的第一、二个数是 1,从第三个数起,每个数是其前面两个数之和。据此,下面有求斐波那契前 12 项值的过程,请完善之。Sub Fibonacci(N As Integer,s1)s1=0f1=1(11) For i=1 To N/2Print f1;f2;s1=f1+f2f1=f1+f2f2= (12) Next iPrintEnd SubPrivate Sub Command1_Click( )Dim sun As IntegerCall Fibonacci(12,sun)Print “Sun=“;SunEnd Sub(分数:4
21、.00)填空项 1:_填空项 1:_44.以下程序的功能是:把当前目录下的顺序文件 smtext1.txt 的内容读入内存,并在图片框 Picture1 中显示出来。请填空。Private Sub Command1_Click( )Dim inData As StringOpen “./mText1.txt“ (13) As 1Do While Not EOF(1)Input #i,inDataPicture1.Print inDataLoopClose#1End Sub(分数:2.00)填空项 1:_运行下列程序,单击 Command1 命令按钮后,则在窗体上显示第一行和第二行的结果分别是
22、(14) 和 (15) 。Private Sub Command1_Click( )t=1:x=2:y=3:z=4If t0 Or t=x And xy Or yz Thent=fun1(t,z)Print tElset=fun1(x,y)Print tEnd IfPrint xPrint yEnd SubFunction fun1(ByVal x As Integer,ByVal y As Integer)As IntegerDo While y0t=x/yx=yy=tLoopfun1=xEnd Function(分数:4.00)填空项 1:_填空项 1:_二级 VISUAL+BASIC 笔
23、试-79 答案解析(总分:100.00,做题时间:90 分钟)一、选择题(总题数:35,分数:70.00)1.窗体上没有任何控件,有下列程序:Option Base 1Private Sub Form_KeyPress(KeyAscii As Integer)a=Array(5,2,7,6,9)x=a(1)y=1If KeyAscii=13 ThenFor i=2 To 5If a(i)m1 Thenx=a(i)y=iEnd IfNext iEnd IfPrint x;yEnd Sub执行程序后,按下回车键后输出结果为_。(分数:2.00)A.5 1B.9 5 C.2 2D.7 3解析:解析
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
5000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 职业资格 二级 VISUALBASIC 笔试 79 答案 解析 DOC
