【计算机类职业资格】二级VISUAL+BASIC笔试70及答案解析.doc
《【计算机类职业资格】二级VISUAL+BASIC笔试70及答案解析.doc》由会员分享,可在线阅读,更多相关《【计算机类职业资格】二级VISUAL+BASIC笔试70及答案解析.doc(15页珍藏版)》请在麦多课文档分享上搜索。
1、二级 VISUAL+BASIC 笔试 70 及答案解析(总分:92.00,做题时间:90 分钟)一、B选择题/B(总题数:35,分数:70.00)1.算法的空间复杂度是指(分数:2.00)A.算法程序的长度B.算法程序中的指令条数C.算法程序所占的存储空间D.算法执行过程中所需要的存储空间2.源程序的文档化不包括(分数:2.00)A.符号名的命名要有实际意义B.正确的文档格式C.良好的视觉组织D.正确的程序注释3.软件调试的目的是(分数:2.00)A.发现错误B.改正错误C.改善软件的性能D.挖掘软件的潜能4.在窗体上画一个名称为 Command1 的命令按钮,然后编写如下程序: Privat
2、e Sub Command1_Click() Static x As Integer Static y As Integer Cls y = 1 y = x+2 x = 4 + y Print x, y End Sub 程序运行时,三次单击命令按钮 Command1 后,窗体上显示的结果为(分数:2.00)A.3 4B.18 14C.15 14D.7 125.编写如下事件过程: Option Base 1 Private Sub Form Click() Dim x1()As Integer Dim i As Integer Dim s As Integer ReDim x1(3) For i
3、 = 1 To UBound(x1) x1(i)=i + 1 Next i Call sub1(x1) For i = 1 To UBound(x1) s = s + x1(i) Next i Print s End Sub Private Sub sub1(n()As Integer) Dim i As Integer ReDim Preserve n(5) For i = 3 To 5 n(i)=n(i-1)*2 Next i End Sub 程序运行后,单击窗体,则窗体上显示的内容是(分数:2.00)A.6B.12C.24D.476.数据独立性是数据库技术的重要特点之一。所谓数据独立性是
4、指(分数:2.00)A.数据与程序独立存放B.不同的数据被存放在不同的文件中C.不同的数据只能被对应的应用程序所使用D.以上三种说法都不对7.在窗体上画一个名称为 Timet1 的计时器、一个名称为 Commandl 的命令按钮和一个名称为 Labell 的标签。编写程序如下: Private Sub Command1_Click() Timer1Enabled=True Timer1Interval=1000 End Sub Private Sub Timerl Timer() LabellLeft=LabellLeft + 10 End Sub 当运行程序后,单击命令按钮,将会产生(分数:
5、2.00)A.每秒钟显示一次系统时间B.每 10 秒钟显示一次系统时间C.每秒钟标签向右移一段距离D.每秒钟标签向左移一段距离8.阅读如下程序: Option Base 1 Private Sub Form Click() Dim Arr(4,4)As Integer For i=1 To 4 For j=1 To 4 Arr(i,j)=(i-1)*2+j Next j Next i For i=3 To 4 For j=3 To 4 Print Arr(j,i); Next j Print Next i End Sub 程序运行后,单击窗体,输出的结果为(分数:2.00)A.5 7 6 8B
6、.6 8 7 9C.7 9 8 10D.8 10 8 119.阅读下面的程序: Private Sub Form_Click() Dim m,n As Integer m=InputBox(“请输入 M 的值“) m=Val(m) m1=m n=InputBox(“请输入 N 的值“) n=Val(n) n1=n Do While n0 remin=m Mod n m=n n=remin Loop Print m1,n1,m End Sub 程序运行后,单击窗体,在对话框中分别输入 16 和 24,则程序在窗体上的输出结果为(分数:2.00)A.16 24 4B.16 24 8C.24 16
7、6D.24 16 810.为了将窗体上的某个控件变为活动的,应执行的操作是(分数:2.00)A.单击窗体的边框B.单击该控件的内部C.双击该控件D.双击窗体11.假定程序中有如下语句: answer=MsgBox(“第一个字符串“,vbAbortRetryIgnore Or vbCritical_ Or vbDefaultButton3,“第二个字符串“)执行该语句后,将显示一个信息框,此时如果按回车键,则 answer的值为(分数:2.00)A.“第二个字符串“B.5C.3D.712.设已经在窗体上添加了一个通用对话框控件 CommonDialog1,以下正确的语句是(分数:2.00)A.C
8、ommonDialog1Filter=AllFiles|*.*|Pictures(*Bm|*BmpB.CommonDialog1Filter=“AllFiles“|*|Pictures(*Bm|*BmpC.CommonDialog1Filter=(AllFiles|*,*|Pictures(*Bm|*BmD.CommonDialog1Filter=“AllFiles|*|Pictures(*Bm|*Bmp“13.为了使图像(Image)控件中的图像自动适宜控件的大小,下列叙述正确的是(分数:2.00)A.将控件的 AutoSize 属性设为 TrueB.将控件的 AutoSize 属性设为 F
9、alseC.将控件的 Stretch 属性设为 TrueD.将控件的 Stretch 属性设为 False14.对长度为 n 的线性表进行顺序查找,在最坏的情况下所需要的比较次数为(分数:2.00)A.log2nB.n/2C.nD.n+115.为了在按下回车键时执行某个命令按钮的事件过程,需要将该命令按钮的一个属性设置为 True,这个属性是(分数:2.00)A.ValueB.DefaultC.CantelD.Enabled16.编写如下事件过程: Private Sub Form KeyDown(KeyCode As Integer,Shift As Integer) If(Button A
10、nd 3)=3 Then Print “AAAA“ End If End Sub 程序运行后,为了在窗体上输出“AAAA”,应按下的鼠标键为(分数:2.00)A.左B.右C.同时按下左、右D.按什么键都不显示17.对数据元素序列(49,72,68,13,38,50,97,27)进行排序,前 3 趟排序结束时的结果依次为,第1 趟:13,72,68,49,38,50,97,27:第 2 趟:13,27,68,49,38,50, 97,72;第 3 趟:13,27,38,49,68,50,97,72。该排序采用的方法是(分数:2.00)A.插入排序法B.选择排序法C.冒泡排序法D.快速排序法18.
11、在软件生命周期中,所花费用最多的阶段是(分数:2.00)A.详细设计B.软件编码C.软件测试D.软件维护19.使用链表来表示线性表的优点是(分数:2.00)A.便于插入和删除操作B.数据元素的物理顺序与逻辑顺序相同C.花费的存储空间较顺序存储少D.便于随机存取20.以下定义数组或给数组元素赋值的语句中,正确的是(分数:2.00)A.Dim x%(2) x(1)=“等级考试“B.Dim x(3), y(3)As Integer x(0)=1:y=xC.Dim x x=Array(0,1,2)D.Dim x(3)As Integer x=Array(0,1,2)21.下列成员中不属于主窗口的是(分
12、数:2.00)A.最大化按钮B.状态栏C.系统菜单D.工具栏22.在显示菜单时,菜单项的下列哪个属性为 True 时将用浅灰色显示该菜单项标题(分数:2.00)A.CaptionB.CheckedC.EnabledD.Visible23.在窗体中画一个命令按钮,然后编写以下事件过程: Private Sub Command1_Click() For i=1 To 4 x=4 For j=1 To 3 x = 3 For k=1 To 2 x = x + 6 Next k Next j Next i Print x End Sub 程序运行后,单击命令按钮,输出结果是(分数:2.00)A.7B.
13、15C.157D.53824.在窗体上画一个名称为 Command1 的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim m(10)As Integer Dim b(3)As Integer s = 0 For i=1 To 10 m(i)=i Next i For i=1 To 3 b(i)=m(i * i) Next i For i=1 To 3 s = s + b(i)*3 Next i Print s End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是(分数:2.00)A.78B.10C.33D.4225.下面 4 个选项中
14、,不是窗体属性的是(分数:2.00)A.MinButtonB.MaxButtonC.CaptionD.Load26.假定窗体上画了多个控件,并有一个控件是活动的,为了在属性窗口中设置窗体的属性,预先应执行的操作是(分数:2.00)A.单击窗体上没有控件的地方B.单击任一个控件C.不执行任何操作D.双击窗体的标题栏27.在窗体上画一个文本框 Text1、一个标签 Label1 和一个命令按钮 Command1,然后编写如下两个事件过程: Private Sub Command1_Click() a=InputBox(“请输入一个字符串“) Text1Text=a End Sub Private
15、Sub Textl_Change() Label1Caption=UCase(Mid(Text1Text,8) End Sub 程序运行后,单击命令按钮,将显示一个输入对话框,如果在该对话框中输入字符串“Visual Basic”,则在标签中显示的内容是(分数:2.00)A.visual basicB.VISUAL BASICC.basicD.BASIC28.设有如下通用过程: Public Function f(x As Integer) Dim y As Integer x = 10: y = 5 f = x * y End Function 在窗体上画一个名称为 Command1 的命令
16、按钮,然后编写如下事件过程: Private Sub Command1_Click() Static x As Integer x = 2:y = 6 y = f(x) Print x; y End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是(分数:2.00)A.2 6B.10 5C.10 50D.6 1029.编写如下事件过程: Option Explicit Private Sub Form_Click() Dim Str As String, I As Integer Open “examp“ For Output As 1 For I=1 To 5 Str=Chr(I
17、+64) Print #1,Str; Next I Close 1 Open”examp,For lnput AS 2 Str=Input(10,#2) Print Str; Close 2 End Sub 程序运行后,单击窗体,则窗体上显示的内容是(分数:2.00)A.ABCDEB.96C.65D.abcde30.在窗体上画 3 个名称为 Command1 的命令按钮作为控件数组,从左到右,控件数组下标分别为0、1、2,界面如下图所示。有下列程序: Private Sub Command1 Click(Index As Integer) Dim s As String Select Case
18、 Index Case 0 s= “飞机“ Case 1 s=“汽车“ Case 2 s= “火车“ End Select MsgBox s, Index End Sub 执行程序后,单击中间那个按钮,显示的对话框形式为 (分数:2.00)A.B.C.D.31.下列语句正确的是(分数:2.00)A.If xy Then Print “x 不等于 y“B.If xy Then Print “x 不等于 y“C.If xy Then Print “x 不等于 y“D.If xy Print “x 不等于 y“32.用树形结构来表示实体之间联系的模型称为(分数:2.00)A.关系模型B.网状模型C.
19、层次模型D.以上三个都是33.在窗体中添加一个命令按钮和一个文本框,并编写如下程序代码: Private Sub Command1_Click() k=0 Do While k 70 k=k+2 k=k*k+k a=a+k Loop Text1Text=a End Sub 程序运行后,文本框中显示的是(分数:2.00)A.20B.32C.44D.7834.下面语句中错误的是(分数:2.00)A.ReDim Preserve x(10,Ubound(x,2)+1)B.ReDim Preserve x(Ubound(x,1)+1,10)C.ReDim Preserve y(Ubound(+1)D.
20、ReDim y(Ubound(+1)35.设一棵树 T 的度为 4,其中度为 1,2,3,4 的结点个数分别为 4,2,1,1。则 T 中的叶子结点为(分数:2.00)A.8B.7C.6D.5二、B填空题/B(总题数:11,分数:22.00)36.在一个容量为 15 的循环队列中,若头指针 front=6,尾指针 rear=9,则该循环队列中共有U 【1】 /U个元素。(分数:2.00)填空项 1:_37.具有 80 个结点的完全二叉树的深度为U 【2】 /U。(分数:2.00)填空项 1:_38.使用已经存在的类作为基础建立新类的定义,这种技术叫做类的U 【3】 /U。(分数:2.00)填空
21、项 1:_39.数据流图的类型有U 【4】 /U和事务型。(分数:2.00)填空项 1:_40.在关系模型中,表 A 中的某属性集是某表 B 的键,则称该属性集为 A 的U 【5】 /U。(分数:2.00)填空项 1:_41.在用sual Basic 开发应用程序时,一般需要建立可视用户界面、设置对象属性和U 【6】 /U3 步。(分数:2.00)填空项 1:_42.设有如下程序: Private Sub Form_Click() a=32548.56 Print Format(Int(a*10+0.5)/10,“000,000.00“) End Sub 程序运行后,单击窗体,输出结果为U 【
22、7】 /U。(分数:2.00)填空项 1:_43.在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框,其名称分别为 Dhvel、 Dirl 和File1。为了使它们同步操作,必须触发 Drive1_Change()事件和 Dir1_Change()事件,在这两个事件中执行的语句分别是U 【8】 /U和U 【9】 /U。(分数:2.00)填空项 1:_44.要想在文本框中显示垂直滚动条,必须将U 【10】 /U属性设置为 2,同时还应将 MultiLine属性设置为 True。(分数:2.00)填空项 1:_45.组合框有 3 种不同的类型,这 3 种类型是下拉式组合框、简单组合框、下拉
23、式列表框,分别通过将U【11】 /U属性设置为 0、1、2 宋实现。(分数:2.00)填空项 1:_46.要打印出 50 个在-100100 之间不同的随机整数,并找出第几个是最大数。给定的程序不完整,将程序补充完整。 Option Base 1 Private Sub Command1_Click() Dim b() Randomize U【12】 /U Do x=Rnd If x0.5 Then y=1 Else y=-1 t=y*Int(Rnd*100)+1 U 【13】 /U Do While kj If t b(k)Then k = k + 1 Else Exit Do End If
24、 Loop If k=j Then ReDim Preserve b(k) b(k)=t Print b(k); j=j+1 End If Loop Until j50 Print U【14】 /U Max=b(1) For n=2 To 50 If b(n)Max Then U【15】 /U p = n End If Next n Print “最大数是:“;Max Print “位置在第“;p;“个“ End Sub(分数:2.00)填空项 1:_二级 VISUAL+BASIC 笔试 70 答案解析(总分:92.00,做题时间:90 分钟)一、B选择题/B(总题数:35,分数:70.00)
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
5000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 职业资格 二级 VISUALBASIC 笔试 70 答案 解析 DOC
