【计算机类职业资格】二级VISUAL+BASIC笔试9及答案解析.doc
《【计算机类职业资格】二级VISUAL+BASIC笔试9及答案解析.doc》由会员分享,可在线阅读,更多相关《【计算机类职业资格】二级VISUAL+BASIC笔试9及答案解析.doc(16页珍藏版)》请在麦多课文档分享上搜索。
1、二级 VISUAL+BASIC 笔试 9 及答案解析(总分:92.00,做题时间:90 分钟)一、B选择题/B(总题数:35,分数:70.00)1.有如下函数过程: Function HFC(ByVal x AS Integer,ByVal y As Integer)As Integer Do While y 0 sic=x/y X=y y=sic Loop HFC=x End Function 以下是该函数的调用过程,该程序的运行结果是 Private Sub Command1 _ Click( ) Dim a AS Integer Dim b As Integer a=12 b=2 x=H
2、FC(a,b) Print x End Sub(分数:2.00)A.0B.6C.2D.802.实体是信息世界中广泛使用的一个术语,它用于表示(分数:2.00)A.有生命的事物B.无生命的事物C.实际存在的事物D.一切事物3.当组合框的 Style 属性设置为何值时,组合框称为下拉式列表框(分数:2.00)A.0B.1C.2D.34.软件开发的结构化生命周期方法将软件生命周期划分成(分数:2.00)A.定义、开发、运行维护B.设计阶段、编程阶段、测试阶段C.总体设计、详细设计、编程调试D.需求分析、功能定义、系统设计5.在 Visual Basic 中,被称为对象的是(分数:2.00)A.窗体B
3、.控件C.控件和窗体D.窗体、控件和属性6.Visual Basic 标题栏上显示了应用程序的(分数:2.00)A.大小B.状态C.位置D.名称7.在属性窗口中设置何属性,可以把指定的图形放入当前对象中?(分数:2.00)A.Current YB.PictureC.Current xD.Stretch8.对话框在关闭之前,不能继续执行其他操作,这种对话框属于(分数:2.00)A.输入对话框B.输出对话框C.模式(模态)对话框D.无模式对话框9.在窗体上添加标签控件 Label1 之后,标签控件的默认的名称 Name 是(分数:2.00)A.LabelB.Label1C.TextD.Text11
4、0.表达式 32 Mod l4/23 的值是(分数:2.00)A.1B.0C.2D.311.在窗体上有一个命令按钮,然后编写如下事件过程 Private Sub Command1 _ cickc ( ) a=InputBox(“enter the first integer“) b=InputBox(“enter the second integer“) Print b + a End Sub 程序运行后,单击命令按钮,先后在两个输入框中分别输入“2”和“6”,则输出结果为(分数:2.00)A.2B.62C.8D.2612.有如下事件过程: Sub ABD(x,y,z) z=X +y End
5、Sub Private Sub Command1 _ Click( ) a=30:b=40 Call ABD(a,b,c) Print c End Sub 运行上面的程序,单击命令按钮,输出结果为(分数:2.00)A.70B.700C.7.0E+1D.显示错误信息13.如下事件过程: Function Feed(x) If x 10 Then Feed=X Else Feed=10+x End If End Function Private Sub Command1_Click( ) x=Val(Input Box(“ “,0) pay=Feed(x) Print pay End Sub 运行
6、时在输入框内输入变量 x 的值为 15,输出结果为(分数:2.00)A.0B.15C.25D.3014.对窗体编写如下事件过程: Option Base 1 Private Sub Form_KeyPress (KeyAScii AS Integer) arr=Array(12,15,18,20,24) m1=arr(1) m2=1 If fKeyAscii=12 Then For i=2 To 5 If arr(i)m1 Then m1=arr(i) m2=i End If Next i End If Print m1 Print m2 End Sub 程序运行之后按回车键,输出结果为(分数
7、:2.00)A.12 1B.20 2C.18 5D.24 1215.在以下事件过程中,可以在用户按下鼠标右键时,显示一个上边框,以鼠标当前位置为心的弹出式菜单,而且这个弹出式菜单还可以识别右键对菜单命令的选择,相应的选项;(分数:2.00)A.Private Sub Form _ Mouse Up(Button As Integer,Shift AS Integer,_ X As Single,Y As Singl If Button=2 Then PopupMenu mnuEdit,vbPopupMenuCenterAlign Or_ vbPopupMenuRightButton,X,Y,m
8、nuEditOpen End If End SubB.Private Sub Form _ MouseUp(Button AS Integer,Shift AS Integer,_ X As Single,Y As Singl If Button=2 Then PopupMenu mnuEdit, End If End SubC.Private Sub Form _ MouseUp(Button AS Integer,Shift AS Integer,_ X As Single,Y As Singl PopupMenu mnuEdit,vbPopupMenuCenterAlign Or_ vb
9、PopupMenuRightButton End SubD.Private SUb Form _ MouseUp(Button AS Integer,_ Shift As Integer,X As Single,Y As Singl If Button=2 Then PopupMenu mnuEdit,2 End If End Sub16.对下列程序段,说法正确的是 Text1Top=2000 Text1Left=800(分数:2.00)A.Text1 对象的左边界距窗体的左边界是 800twip,上边界距窗体的上边界为 2000twipB.Text1 对象的左边界距屏幕的左边界为 800tw
10、ip,上边界距屏幕的上边界为 2000twipC.Text1 对象的宽度为 2000twip,高度为 800twipD.Text1 对象的高度为 800 点,宽度为 2000 点17.有变量定义语句 Dim max,min As String,则可以知道 max 的类型是(分数:2.00)A.变体类型B.单精度型C.双精度型D.字符串型18.下列操作可以打开立即窗口的是(分数:2.00)A.Ctrl + DB.Ctrl + FC.Ctrl + GD.Ctrl + E19.数据库设计包括两个方面的设计内容,它们是(分数:2.00)A.概念设计和逻辑设计B.模式设计和内模式设计C.内模式设计和物理
11、设计D.结构特性设计和行为特性设计20.在软件工程中,白箱测试法可用于测试程序的内部结构。此方法将程序看做是(分数:2.00)A.路径的集合B.循环的集合C.目标的集合D.地址的集合21.用于显示输入输出文本的控件是(分数:2.00)A.B.C.D.22.下列程序段的执行结果为 Dim t(10) For k=2 To 10 t(k) =11 - k Next k X=6 Print t(2+t(x)(分数:2.00)A.2B.3C.4D.523.当双击窗体 Form1 时,要将窗体 Form1 隐藏起来、将窗体 Form2 以模式方式显示出来的事件过程,正确的是(分数:2.00)A.Priv
12、ate Sub Form _ Db1Click( ) FormHide Form2Show 0 End SubB.Private Sub Form _ Db1Click( ) FormHide Form 2Show 1 End SubC.Private Sub Form _ Click( ) Form Hide Form 2Show End SubD.Private Sub Form _ Dbl Click( ) Form Enabled=False Form 2Enabled=True End Sub24.栈底至栈顶依次存放元素 A、B、C、D,在第五个元素 E 入栈前,栈中元素可以出栈,则
13、出栈序列可能是(分数:2.00)A.ABCEDB.DCBEAC.DBCEAD.CDABE25.下列程序段的执行的结果是 Dim a(10),b(10) i=3 For j=1 To 5 a(j) =j b(i) =2 * i + j Next j Print b(i);a(i)(分数:2.00)A.11 3B.3 15C.3 11D.15 326.在窗体上画一个命令按钮,然后写出如下事件过程: Private Sub Command1 _ Click( ) S=1 Do S=(S + 1) (S + 2) Number=Number+1 Loop Until S=6 Print Number,
14、S End Sub 程序运行后,输出的结果是(分数:2.00)A.2 3B.3 18C.1 8D.10 2027.模块独立性是软件模块化所提出的要求,衡量模块独立性的度量标准则是模块的(分数:2.00)A.抽象和信息隐蔽B.局部化和封装化C.内聚性和耦合性D.激活机制和控制方法28.n 个顶点的强连通图的边数至少有(分数:2.00)A.n-1B.n(n-1)C.nD.n+129.在结构化程序设计思想提出之前,在程序设计中曾强调程序的效率,现在,与程序的效率相比,人们更重视程序的(分数:2.00)A.安全性B.一致性C.可理解性D.合理性30.在数据管理技术发展过程中,文件系统与数据库系统的主要
15、区别是数据库系统具有(分数:2.00)A.特定的数据模型B.数据无冗余C.数据可共享D.专门的数据管理软件31.为了通过键盘访问主菜单项,可在菜单编辑器的“标题”选项中的某个字母前插入何字符,建立热键字母?(分数:2.00)A.&B.#C.*D.$32.在窗体上画一个命令按钮,然后编写如下事件过程: Sub BTC(old Copy( ) As Integer,new Copy( ) As Integer) Dim i AS Integer For i=LBound(oldCopy( )To UBound(oldCopy( ) newCopy(i)=oldCopy(i) Next i End
16、Sub Private Sub Command1 _ Click( ) Dimm(10) As Integer,n(10)As Integer For i=1 To 10 m(i) =i*i Next i Call BTC(m,n) Print n(5) End Sub 程序运行后,单击命令按钮输出结果为(分数:2.00)A.0B.2C.10D.2533.循环链表的主要优点是(分数:2.00)A.不再需要头指针了B.从表中任一结点出发都能访问到整个链表C.在进行插入、删除运算时,能更好的保证链表不断开D.已知某个结点的位置后,能够容易的找到它的直接前件34.下面叙述不正确的是(分数:2.00)
17、A.对顺序文件中的数据操作只能按一定的顺序操作B.顺序文件结构简单C.顺序文件的数据以字符(ASCII 码)形式存储D.能同时对顺序文件进行读写操作35.下列程序的执行结果为 a=10 b=20 If a b Then a=a + b Else b=b-a Print a,b(分数:2.00)A.20 20B.30 20C.30 40D.15 15二、B填空题/B(总题数:11,分数:22.00)36.常用的黑箱测试有等价分类法、U 【1】 /U、因果图法和错误推测法 4 种。(分数:2.00)填空项 1:_37.测试的目的是暴露错误,评价程序的可靠性;而U 【2】 /U的目的是发现错误的位置
18、并改正 错误。(分数:2.00)填空项 1:_38.软件维护活动包括以下几类:改正性维护、适应性维护、U 【3】 /U维护和预防性维护。(分数:2.00)填空项 1:_39.在面向对象的设计中,用来请求对象执行某一处理或回答某些信息的要求称为U 【4】 /U。(分数:2.00)填空项 1:_40.关键字 ASC 和 DESC 分别表示U 【5】 /U的含义。(分数:2.00)填空项 1:_41.下述语句段在运行时的显示结果是U 【6】 /U。 Cls x=1034 + 8 Print Len(x)(分数:2.00)填空项 1:_42.窗体上有两个按钮,则执行程序后按键盘 Cancel 键的输出
19、结果是U 【7】 /U。 Private Sub Command1 _ Click( ) Print“北京“; End Sub Private Sub Command2 _ Click( ) Print“南京“; End Sub Private Sub Form _ Load( ) Command2CancelTrue Command1Cancel=True End Sub(分数:2.00)填空项 1:_43.下列事件过程的功能是:通过 Form _ Load 事件给数组赋初值为 35、48、15、22、67,Form_ Click事件找出可以被 3 整除的数组元素并打印出来。请在空白处填人适
20、当的内容,将程 序补充完整。 Dim Arr ( ) Private Sub Form _ Load( ) U 【8】 /U End Sub Private Sub Form _ Click( ) U 【9】 /U If Int(x/3)=x/3 Then Print x End If Next x End Sub(分数:2.00)填空项 1:_44.给定年份,下列程序用来判断该年是否是闰年,请填空。Sub YN( )Dim X AS IntegerxInput Box(“请输入年号“)If( x Mod 4=0U 【10】 /Ux Mod l000)U 【11】 /U(x Mod 400=0
21、)ThenPrint“是闰年“ElsePrint“不是闰年,是普通年份“End IfEnd Sub(分数:2.00)填空项 1:_45.在 E 盘当前目录文件夹下建立一个名为“Studenttxt的顺序文件,要求用 InputBox 函数输入 5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。 Private Sub Form _ Click( ) U【12】 /U For i=1 To 5 StuName=InputBox(“请输入姓名“) StuGrade=InputBox(“请输入年级号“) StuAge=InputBox(“请输入年龄“) U【13】 /
22、U Next i U【14】 /U End Sub(分数:2.00)填空项 1:_46.在窗体上有一个命令按钮,然后编如下事件过程: Function SR( x As Double)As Double Select Case Sgn(x) Case 1 SR=Sqr(x) Exit Function Case 0 SR=0 Case-1 SR=-1 End Select End Function Private Sub Command1 _ Click( ) Dim Msg,SRN Dim N AS Double N=InputBox(“请输入要计算平方根的数“) Msg=N&“的平方根“
23、Select Case SR(N) Case 0 Msg=Msg &“是 0“ Case-1 Msg=Msg&“是一个虚数“ Case ElSe Msg=Msg &“是“& SR(N) End Select MsgBox Msg End Sub 程序运行后,单击命令按钮,在输入对话框内输入1,输出结果是U 【15】 /U。(分数:2.00)填空项 1:_二级 VISUAL+BASIC 笔试 9 答案解析(总分:92.00,做题时间:90 分钟)一、B选择题/B(总题数:35,分数:70.00)1.有如下函数过程: Function HFC(ByVal x AS Integer,ByVal y
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
5000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 职业资格 二级 VISUALBASIC 笔试 答案 解析 DOC
