【计算机类职业资格】二级VISUAL+BASIC-17-2及答案解析.doc
《【计算机类职业资格】二级VISUAL+BASIC-17-2及答案解析.doc》由会员分享,可在线阅读,更多相关《【计算机类职业资格】二级VISUAL+BASIC-17-2及答案解析.doc(14页珍藏版)》请在麦多课文档分享上搜索。
1、二级 VISUAL+BASIC-17-2 及答案解析(总分:74.00,做题时间:90 分钟)一、选择题(总题数:25,分数:44.00)1.函数过程 n 的功能是:如果参数 b 为奇数,则返回值为 1,否则返回值为 0。以下能正确实现上述功能的代码的是_。(分数:2.00)A.Function F1(b As Integer)If b Mod 2=0 ThenReturn 0ElseReturn 1End IfEnd FunctionB.Function F1(b As Integer)If b Mod 2=0 ThenF1=0ElseF1=1End IfEnd FunctionC.Func
2、tion F1(b As Integer)If b Mod 2=0 ThenF1=1ElseF1=0End IfEnd FunctionD.Functionn(b As Integer)If b Mod 2 0ThenReturn 0ElseReturn 1End IfEnd Function2.以下程序执行按钮单击事件后的输出结果为_。 Private Sub Command1_Click() Print Test(2,3) Print Test(2, 3, 4) Print Test(2,3, 0) End Sub Private Function Test(p, m, Optional
3、n=0)As Integer Test=p*m-n End Function(分数:2.00)A.626B.622C.624D.出错3.以下叙述中错误的是_。(分数:2.00)A.在同一窗体的菜单项中,不允许出现标题相同的菜单项B.在菜单的标题栏中,“&“所引导的字母指明了访问该菜单项的访问键C.在程序运行过程中,可以重新设置菜单的 Visible 属性D.弹出式菜单也在菜单编辑器中定义4.在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() x=0 Do Until x=-1 a=InputBox(“请输入 A 的值“) a=Val(A)
4、b=InputBox(“请输入 B 的值“) b=Val(B) x=InputBox(“请输入 x 的值“) x=Val(x) a=a+b+x Loop Print a End Sub 程序运行后,单击命令按钮,依次在输入对话框中输入 5、4、3、2、1、-1,则输出结果为 _。(分数:1.00)A.2B.3C.14D.155.在窗体上绘制一个名称为 Commandl 的命令按钮,然后编写如下程序: Option Base 1 Private Sub Commandl_Click() Dim c As Integer,d As Integer d=0 c=6 x=Array(2,4,6,8,1
5、0,12) Fori=1 To 6 1fx(i)c Then d=d+x(i) c=x(i) Else d=d-c End If Nexti Print d End Sub 程序运行后,如果单击命令按钮,则在窗体上输出的内容为 _ 。(分数:2.00)A.10B.16C.12D.206.要获得当前驱动器应使用驱动器列表框的哪个属性_。(分数:1.00)A.PathB.DriveC.DirD.Pattern7.在窗体上有一个名称为 Command1 的命令按钮,并有如下程序: Private Sub Command1_Click() Static X As Integer Static Y As
6、 Integer Cls Y=1:Y=Y+5:X=5+X:Print X, Y End Sub 程序执行时,单击命令按钮 Command1 三次后,窗体上显示的结果为_。(分数:2.50)A.15 16B.5 6C.15 15D.15 68.一些重要的程序语言(如 C 语言和 Pascal 语言)允许过程的递归调用。而实现递归调用中的存储分配通常用 _(分数:2.00)A栈B堆C.数组D.链表9.语句 Dim a(-3 To 4,3 To 6)As Integer 定义的数组的元素个数是(分数:3.00)A.18B.28C.21D.3210.软件测试的内容包括: 、有效性测试 、集成测试 、验
7、收测试 、系统测试 、单元测试 正确的测试顺序是_。(分数:1.00)A.、B.、C.、D.、11.在 Visual Basic 6 中下列 _是不对的。(分数:1.00)A.可以编写 ActiveX 控件B.可以编写网络程序C.可以通过直接访问或建立连接的方式访问大型网络数据库D.可以写出 16 位应用程序12.通过文本框的 _ 属性可以获得当前插入点所在的位置。(分数:2.00)A.PositionB.SelStartC.SelLengthD.SelText13.确定复选框是否选中,可访问的属性是 _ 。(分数:2.00)A.ValueB.CheckedC.SelectedD.Captio
8、n14.下列哪一项使图像(Image)控件中的图像自动适应控件的大小 _ 。(分数:2.00)A.将控件的 AutoSize 属性设为 TrueB.将控件的 AutoSize 属性设为 FalseC.将控件的 Stretch 属性设为 TrueD.将控件的 Stretch 属性设为 False15.在窗体中画一个命令按钮,然后编写以下事件过程: Private Sub Command1_Click() For j=1 To 3 Print Tab(3(j);11(2(j-1); Next j Print End Sub 程序的执行结果为(分数:2.00)A.11B.33C.11 33D.11
9、33 5516.在 Visual Basic 中,以下关于变量描述中不正确的是_。(分数:2.00)A.局部变量的作用域就是其所在的过程B.模块变量的作用域就是所有标准模块的过程C.默认声明只适用于局部变量,不能用于模块级变量和全局变量D.全局变量的作用域是整个工程中所有的模块和所有的过程17.若在某窗体模块中有如下事件过程: Privam Sub Command1_Click(Index As Integer) End Sub 则以下叙述中正确的是_。(分数:1.00)A.此事件过程与不带参数的事件过程没有区别B.有个名称为 Command1 的窗体,单击此窗体则执行此事件过程C.有一个名称
10、为 Command1 的控件数组,数组中有多个不同类型控件D.有今名称为 Command1 的控件数组,数组中有多个相同类型控件18.下列关于数据库系统,说法正确的是_。(分数:2.00)A.数据库中只存在数据项之间的联系B.数据库中只存在记录之间的联系C.数据库中数据项之间和记录之间都存在联系D.数据库中数据项之间和记录之间都不存在联系19.为了调整图像框的大小以与其中的图形相适应,必须把它的 Stretch 属性设置为(分数:2.50)A.TrueB.FalseC.1D.220.按文件的内容划分有 _ 。(分数:2.00)A.顺序文件和随机文件B.ASCII 文件和二进制文们:C.程序文件
11、和数据文件D.磁盘文件和打印文件21.某二叉树中度为 2 的结点有 10 个,则该二叉树中有 _ 个叶子结点。(分数:2.00)A.9B.10C.11D.1222.Visual Basic 窗体设计器的主要功能是: _ 。(分数:1.00)A.建立用户界面B.编写源程序代码C.画图D.显示文字23.已知 a=6,b=15,c=23,则语句 Print Sgn(a+b Mod 6-c/a)&a+b 的输出结果为_。(分数:1.00)A.6B.16C.31D.12124.以下关于变量类型说明符的使用正确的是 _(分数:2.00)A.Dim a%: a=90B.Dim a:a2000C.Dim a#
12、:a=“OK“,D.Dim a&:a=True25.在数据库系统中,当总体逻辑结构改变时,通过修改 _ ,使局部逻辑结构不变,从而使建立在局部逻辑结构之上的应用程序也保持不变,称之为数据和程序的逻辑独立性。(分数:1.00)A.应用程序B.逻辑结构和物理结构之间的映像C.存储结构D.局部逻辑结构到总体逻辑结构的映像二、填空题(总题数:15,分数:30.00)26.数据库设计分为以下 6 个设计阶段:需求分析阶段、 _ 1_ 、逻辑设计阶段、物理设计阶段、实施阶段、运行和维护阶段。 (分数:1.00)27.当对象得到焦点时,会触发 1 事件,当对象失去焦点时将触发 2 事件。 (分数:4.00)
13、28.逻辑常量值为 True 或 1。 (分数:2.00)29.在窗体上画个命令按钮,其名称为 Command1,然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim Arr Arr=Array(43,68,-25,65,-78,12,-79,43,-94,72) pos=0 neg=0 For k=1 To 10 If Art(k)0 Then _ 1_ Else _ 2_ End If Next k Print pos,neg End Sub 以上程序的功能是,计算并输出数组 Arr 中 10 个数的正数之和 pos 与负数之和
14、neg,请填空。 (分数:2.00)30.将语句“MsgBox msg,type“中的“type“参数设置为 2,则单击命令按钮会弹出一个对话框,其中的按钮有 1、 2 和 3。 (分数:2.00)31.数据结构分为逻辑结构与存储结构,线性链表属于 _ 1_ 。 (分数:1.00)32.在结构化分析使用的数据流图(DFD)中,利用 1 对其中的图形元素进行确切解释。 (分数:2.00)33.下列程序用于输出一个主对角线上元素值为“*”,其他元素值为“#”的 55 阶的方阵,试将程序补充完整。 Private Sub Command1_Click() Dim x(5, 5) For i = 1
15、To 5 For j = 1 To 5 If 1 Then x(i, j) = “*“ Else 2 End If Print 3 Next j Print Next i End Sub (分数:2.00)34.下列事件过程的功能是:建立一个名为 Data1 的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为 1,2,3,90。请在空白处填入适当的内容,将程序补充完整。 Private Type Ang K As Integer Sinx As Single Cosx As Single End Type Dim Ksc As Ang Private Sub Form_Click
16、() Dim Y As Single Open _ 1_ Y=3.14159/180 For i=1 To 90 Ksc.K=i Ksc.Sinx=Sin(i*Y) Ksc.Cosx=Cos(i*Y) _ 2_ Next Close#2 End Sub (分数:2.00)35.滚动条响应的重要事件有 1 和 Change。 (分数:2.00)36.表达式“12345“12345“&“ABC“的值是 1。 (分数:2.00)37.简单的交换排序方法是 1。 (分数:2.00)38.一个变量未被显示定义,末尾也没有类型说明符,则该变量的隐含类型是上 1 类型。 (分数:2.00)39.测试的目的是
17、暴露错误,评价程序的可靠性;而 _ 1_ 的目的是发现错误的位置并改正错误。 (分数:2.00)40.下列语句的输出结果是 1。 Print Format(Int(12345.6789*100+0.5)/100, “0000, 0.00“) (分数:2.00)二级 VISUAL+BASIC-17-2 答案解析(总分:74.00,做题时间:90 分钟)一、选择题(总题数:25,分数:44.00)1.函数过程 n 的功能是:如果参数 b 为奇数,则返回值为 1,否则返回值为 0。以下能正确实现上述功能的代码的是_。(分数:2.00)A.Function F1(b As Integer)If b M
18、od 2=0 ThenReturn 0ElseReturn 1End IfEnd FunctionB.Function F1(b As Integer)If b Mod 2=0 ThenF1=0ElseF1=1End IfEnd Function C.Function F1(b As Integer)If b Mod 2=0 ThenF1=1ElseF1=0End IfEnd FunctionD.Functionn(b As Integer)If b Mod 2 0ThenReturn 0ElseReturn 1End IfEnd Function解析:解析 Visual Basic 程序中不
19、能使用 Return 语句来返回一个函数的值。要返回一个函数的值,需要把这个值赋值给函数名。所以本题中 A、D 选项错误,而题目中,当 b 为奇数时返回 0,所以本题答案是 B。2.以下程序执行按钮单击事件后的输出结果为_。 Private Sub Command1_Click() Print Test(2,3) Print Test(2, 3, 4) Print Test(2,3, 0) End Sub Private Function Test(p, m, Optional n=0)As Integer Test=p*m-n End Function(分数:2.00)A.626 B.622
20、C.624D.出错解析:3.以下叙述中错误的是_。(分数:2.00)A.在同一窗体的菜单项中,不允许出现标题相同的菜单项 B.在菜单的标题栏中,“&“所引导的字母指明了访问该菜单项的访问键C.在程序运行过程中,可以重新设置菜单的 Visible 属性D.弹出式菜单也在菜单编辑器中定义解析:4.在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() x=0 Do Until x=-1 a=InputBox(“请输入 A 的值“) a=Val(A) b=InputBox(“请输入 B 的值“) b=Val(B) x=InputBox(“请输入 x
21、的值“) x=Val(x) a=a+b+x Loop Print a End Sub 程序运行后,单击命令按钮,依次在输入对话框中输入 5、4、3、2、1、-1,则输出结果为 _。(分数:1.00)A.2 B.3C.14D.15解析:解析 本题需要注意的是每次循环开始的时候三个变量都被重新赋了一次值,所以最后的结果仅仅是 2+1+(-1)。所以最终的输出是 2。5.在窗体上绘制一个名称为 Commandl 的命令按钮,然后编写如下程序: Option Base 1 Private Sub Commandl_Click() Dim c As Integer,d As Integer d=0 c=
22、6 x=Array(2,4,6,8,10,12) Fori=1 To 6 1fx(i)c Then d=d+x(i) c=x(i) Else d=d-c End If Nexti Print d End Sub 程序运行后,如果单击命令按钮,则在窗体上输出的内容为 _ 。(分数:2.00)A.10B.16C.12 D.20解析:6.要获得当前驱动器应使用驱动器列表框的哪个属性_。(分数:1.00)A.PathB.Drive C.DirD.Pattern解析:解析 驱动器列表框的 Drive 属性,用来设置或返回程序运行时所选择的驱动器名。格式为: 驱动器列表框名称Drive=驱动器名“驱动器名
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
5000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 职业资格 二级 VISUALBASIC172 答案 解析 DOC
