【计算机类职业资格】二级VISUAL+BASIC笔试7及答案解析.doc
《【计算机类职业资格】二级VISUAL+BASIC笔试7及答案解析.doc》由会员分享,可在线阅读,更多相关《【计算机类职业资格】二级VISUAL+BASIC笔试7及答案解析.doc(15页珍藏版)》请在麦多课文档分享上搜索。
1、二级 VISUAL+BASIC 笔试 7 及答案解析(总分:90.00,做题时间:90 分钟)一、B选择题/B(总题数:35,分数:70.00)1.在窗体上画一个命令按钮,然后编写下列程序 Private Sub Command3_Click( ) Tcl 2 Tcl 3 Tel 4 End Sub Sub Tcl(a As Integer) Static x As Integer x=x + a Print x; End Sub 程序运行后,单击命令按钮,输出结果为(分数:2.00)A.2 3 4B.2 5 9C.3 5 4D.2 4 32.在软件测试设计中,软件测试的主要目的是(分数:2.
2、00)A.实验性运行软件B.证明软件正确C.找出软件中全部错误D.发现软件错误而执行程序3.下列程序的功能是调用字体对话框来设置文本框字体,单击按钮弹出对话框后,按 Cancel 键退出对话框,则 Private Sub Command1_Click( ) CommonDialoglCancelError=True CommonDialoglFlags=cdlCFEffects Or cdlDFBotb CommonDialoglAction=4 CommonDialoglShowFont Text1.Font.Name=CommonDialoglFontName Text1FontSize=
3、CommonDialoglFontSize Text1FontBold=CommonDialog1FontBold Text1FontItalic=CommonDialog1FontItalic Text1FontUnderline=CommonDialog1FontUnderline Text1FontStrikethru=CommonDialog1FontStrikethru Text1ForeColor=CommonDialog1Color End Sub(分数:2.00)A.Text1 的字体不发生变化B.Text1 的字体发生变化C.Text1 的字体和颜色发生变化D.程序出错!4.
4、在深度为 5 的满二叉树中,叶子结点的个数为(分数:2.00)A.32B.31C.16D.155.任何控件都有的属性是(分数:2.00)A.BackColorB.CaptionC.NameD.BorderStyle6.数据库系统的核心是(分数:2.00)A.数据库B.数据库管理系统C.模拟模型D.软件工程7.开发软件时对提高开发人员工作效率至关重要的是(分数:2.00)A.操作系统的资源管理功能B.先进的软件开发工具和环境C.程序人员的数量D.计算机的并行处理能力8.以下程序段的输出结果为 Dim 1,a(10),p(3) k=5 Fori=0 To 10 a(i)=i Next i For
5、i=0 To 2 p(i)=a(i*(i+1) Next i For i=0 To 2 k=k+p(i)*2 Next i Frint k(分数:2.00)A.20B.21C.56D.329.设有声明语句 Dim b(-1 To 10,2 To 9,20)As Integer 则数组 b 中全部元素的个数(分数:2.00)A.2310B.2016C.1500D.165810.下列四组控件属性中,属性值的类型不相同的一组是(分数:2.00)A.Label 控件的 Enabled 属性与 TextBox 控件的 Enabled 属性B.OptionButton 控件的 Value 属性与 Chec
6、kBox 控件的 Value 属性C.Command 控件的 Default 属性与 Command 控件的 Cancel 属性D.Command 控件的 Visible 属性与 Form 控件的 Visible 属性11.设在窗体上有个文本框,然后编写如下的事件过程: Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Const Alt=4 Const Key_F2=&H71 altdown%=(Shift And Alt)0 f2down%=(KeyCode=Key_F2) If altdown% And f2do
7、wn% Then Text1Text=“BBBBB“ End If End Sub 上述程序运行后,如果按【Shift+F2】,则在文本框中显示得是(分数:2.00)A.Alt+F2B.BBBBBC.随机出几个数D.文本框平均内容无变化12.当在滚动条内拖动滚动块时触发(分数:2.00)A.KeyUp 事件B.KeyPress 事件C.Scroll 事件D.Change 事件13.下列程序段的执行结果为 I=9 X=5 Do I=I+1 x=x+2 Loop Until I =7 Print“I=“;I Print“x=“;x(分数:2.00)A.I=4x=5B.I=7x=15C.I=6x=8
8、D.I=10x=714.单击按钮时,以下程序运行后的输出结果是 Private Sub Commandl_Click( ) Dim X As Integer,y As Integer,z As Integer x=1:y=2: Z=3 Call God(x,x,z) Print x;x;z Call God(x,y,y) Print X;y;y End Sub Private Sub God(x As Integer,y As Integer,z As Integer) x=3 * Z + 1 y=2 * Z z=x + y End Sub(分数:2.00)A.6 6 12 7 11 11B.
9、8 5 10 5 11 11C.9 6 12 9 10 15D.8 10 10 5 9 1015.下列程序段的执行结果为 a=5 Fork=1 To 0 a=a + k Next k Print k;a(分数:2.00)A.-1 6B.-1 16C.1 5D.11 2116.可以实现从键盘输入一个作为双精度变量 a 的值的语句是(分数:2.00)A.a=InputBox( )B.a=InputBox(“请输入一个值”)C.a=Val(InputBox(“请输入一个值”)D.a=Val(InputBox( ) )17.下列语句中,获得列表框 List1 中项目个数的语句是(分数:2.00)A.x
10、=List1ListCountB.x=ListCountC.x=List1ListIndexD.x=ListIndex18.设已经在“菜单编辑器”中设计了窗体的快捷菜单,其顶级菜单为 Bs,取消其“可见”属性,运行时,在以下事件过程中,可以使快捷菜单响应鼠标右键菜单的是(分数:2.00)A.Private Sub Form_Mouse Down(Button As Integer,Shift As Integer,- X As Single,Y As Singl If Button=2 Then PopupMenu Bs,2 End SubB.Private Sub Form_MouseDow
11、n(Button As Integer,Shift As Integer,- X As Single,Y As Singl PopupMenu Bs End SubC.Private Sub FOrm_MouseDown(Button As Integer,Shift As Integer,- X As Single,Y As Singl PopupMenu Bs,0 End SubD.Private Sub Form_MouseDown(Button As Integer,Shin As Integer,- X As Single,Y As Singl If(Button=vbLeftBut
12、toOr(Button=vbRightButtoThen PopupMenu Bs End Sub19.索引属于(分数:2.00)A.模式B.内模式C.外模式D.概念模式20.下列方法中不能退出 Visual Basic 的是(分数:2.00)A.按 Alt+Q 组合键B.按下 Alt+F 组合键,然后按 Esc 键C.打开“文件”菜单,执行“退出”命令D.按 F10 键,然后按 F 键,再按 X 键21.要将名为 MyForm 的窗体显示出来,正确的使用方法是(分数:2.00)A.MyForShowB.ShoMyFormC.MyForm LoadD.MyForm Show22.下列程序的执行
13、结果为 Private Sub Commandl_Click( ) Dim X As Integer,y As Integer x=12:y=20 Call Value(x,y) Print X;y End Sub Private Sub Value(ByVal m As Integer,ByVal n As Integer) m=m * 2:n=n-5 Print m;n End Sub(分数:2.00)A.20 12 20 15B.12 20 12 25C.24 15 12 20D.24 12 12 1523.下述关于数据库系统的叙述中正确的是(分数:2.00)A.数据库系统减少了数据冗余
14、B.数据库系统避免了一切冗余C.数据库系统中数据的一致性是指数据类型一致D.数据库系统比文件系统能管理更多的数据24.下列说法错误的是(分数:2.00)A.窗体文件的扩展名为frmB.一个窗体对应一个窗体文件C.Visual Basic 中的一个工程只包含一个窗体D.Visual Basic 中一个工程最多可以包含 255 个窗体25.下列符号常量的声明中,不合法的是(分数:2.00)A.Const a As Single=11B.Const a=“OK“C.Const a As Double=Sin(1)D.Const a As Integer=“12“26.如果将文本框的 MaxLengt
15、h 属性设置为 0,则文本框中的字符不能超过(分数:2.00)A.8KB.16KC.32KD.64K27.下面程序段,运行后的结果是 Private Sub Commandl_Click( ) Dim b%(1 To 4),i%,t# For i=1 To 4 b(i)=i Next i t=Tof(b( ) ) Print“t=“;t, End Sub Function Tof(a() As Integer) Dim t#,i% t=1 For i=2 To UBound(a) t=t * a(i) Next i Tof=t End Function(分数:2.00)A.t=18B.t=24
16、C.t=30D.t=3228.若某二叉树的前序遍历访问顺序是 abdgcefh,中序遍历访问顺序是 dgbaechf,则其后序遍历的结点访问顺序是(分数:2.00)A.bdgcefhaB.gdbecfhaC.bdgaechfD.gdbehfca29.软件工程的理论和技术性研究的内容主要包括软件开发技术和(分数:2.00)A.消除软件危机B.软件工程管理C.程序设计自动化D.实现软件可重用30.在 Visual Basic 中,要强制用户对所用的变量进行显式声明,这可以在哪里设置?(分数:2.00)A.“属性”对话框B.“程序代码”窗口C.“选项”对话框D.对象浏览器31.要获得当前驱动器应使用
17、驱动器列表框的属性是(分数:2.00)A.PathB.DriveC.DirD.Pattern32.以下程序段运行时从键盘上输入字符“-”,则输出结果为 op$=InputBox(“op=“) If op$=“+“ Then a=a+2 If op$=“-“ Then a=a-2 Print a(分数:2.00)A.2B.-2C.0D.+233.下列程序段的执行结果为 a=3 b=1 For I=1 To 3 f=a + b a=b b=f Print f Next I(分数:2.00)A.4 3 6B.4 5 9C.6 3 4D.7 2 834.数据处理的最小单位是(分数:2.00)A.数据B
18、.数据元素C.数据项D.数据结构35.一些重要的程序语言(如 C 语言和 Pascal 语言)允许过程的递归调用。而实现递归调用中的存储分配通常用(分数:2.00)A.栈B.堆C.数组D.链表二、B填空题/B(总题数:10,分数:20.00)36.在树结构中,树根结点没有 【1】 。(分数:2.00)填空项 1:_37.Jackson 结构化程序设计方法是英国的 MJackson 提出的,它是一种面向 【2】 的设计 方法。(分数:2.00)填空项 1:_38.面向对象的模型中,最基本的概念是对象和 【3】 。(分数:2.00)填空项 1:_39.软件设计模块化的目的是 【4】 。(分数:2.
19、00)填空项 1:_40.数据模型按不同应用层次分成 3 种类型,它们是概念数据模型、 【5】 和物理数据 模型。(分数:2.00)填空项 1:_41.在 Visual Basic 的立即窗口内输入以下语句X=65 ? Chr$(X) 在窗口中显示的结果是U 【6】 /U。(分数:2.00)填空项 1:_42.下列程序是判断一个整数(=3)是否为素数,请补充完整。 Dim n As Integer n=InputBox(“请输入一个整数(=3)“) k=Int(Sqr(n) i=2 swit=0 While i0 f2down%=(KeyCode=Key_F2) If altdown% And
20、 f2down% Then Text1Text=“BBBBB“ End If End Sub 上述程序运行后,如果按【Shift+F2】,则在文本框中显示得是(分数:2.00)A.Alt+F2B.BBBBBC.随机出几个数D.文本框平均内容无变化 解析:解析:此题是有关 KeyDown 事件的题目,KeyDown 是当一个键被按下时 所产生的事件,而 KeyUp是松开被按的键时产生的事件,如果要判断是否按下了某个转 换键,可以用逻辑运算符 And。例如:先定义了下面 3 个符号常量:Const Shift=1,Const Ctrl=2,Const Alt=4;然后用下面的语句判断是否按下 Sh
21、ift、Ctrl、Alt 键; 如果 Shift And Shift 0,则按下了 Shift 键; 如果 Shift And Ctrl 0,则按下了 Ctrl 键; 如果 Shift And Alt 0,则按下了 Alt 键; 这里的 Shift时 KeyDown 的第二个参数;此事件过程中的 If 后的条件语句如果为真, 则是按下了 Alt+F2,而本题目中是按下了 Shift+F2,所以不执行 Then 语句,即文本框的 内容无变化。12.当在滚动条内拖动滚动块时触发(分数:2.00)A.KeyUp 事件B.KeyPress 事件C.Scroll 事件 D.Change 事件解析:解析:
22、本题考查的是滚动条事件的应用。在 Visual Basic 中,与滚动条有关的事件是 Scroll 和Change 事件。当在滚动条内拖动滚动块时触发 Scroll 事件;改变滚动框的位置后,将触发 Change 事件。Scroll 事件用于跟踪滚动条中的动态变化,Change 事件用于得到滚动条的最后的值。13.下列程序段的执行结果为 I=9 X=5 Do I=I+1 x=x+2 Loop Until I =7 Print“I=“;I Print“x=“;x(分数:2.00)A.I=4x=5B.I=7x=15C.I=6x=8D.I=10x=7 解析:解析:此题用的是 Do 循环结构,其格式为
23、: Do 语句块 Exit Do Loop Until 循环条件 此循环由于“先执行后检查”,所以至少执行一次。本题中,程序运行到循环条件I=7 的值为 True,才停止。所以当程序结束运行后 I=10,x=7。14.单击按钮时,以下程序运行后的输出结果是 Private Sub Commandl_Click( ) Dim X As Integer,y As Integer,z As Integer x=1:y=2: Z=3 Call God(x,x,z) Print x;x;z Call God(x,y,y) Print X;y;y End Sub Private Sub God(x As
24、Integer,y As Integer,z As Integer) x=3 * Z + 1 y=2 * Z z=x + y End Sub(分数:2.00)A.6 6 12 7 11 11 B.8 5 10 5 11 11C.9 6 12 9 10 15D.8 10 10 5 9 10解析:解析:从整体上看,可得主调过程将两次调用过程 God 后,实参的值将随形参变化而变化,现在分析一下这两次调用实参和形参是怎么变化的:第一次调用被调过程 God,主调过程把实参 x,x 和 z 的地址分别传给形参 x,y 和 z,此时形参 x,y 和 z 值分别为 1,1 和 3,执行语句 x=3 *z+1
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
5000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 职业资格 二级 VISUALBASIC 笔试 答案 解析 DOC
