【计算机类职业资格】二级VISUAL+BASIC-10-1及答案解析.doc
《【计算机类职业资格】二级VISUAL+BASIC-10-1及答案解析.doc》由会员分享,可在线阅读,更多相关《【计算机类职业资格】二级VISUAL+BASIC-10-1及答案解析.doc(15页珍藏版)》请在麦多课文档分享上搜索。
1、二级 VISUAL+BASIC-10-1 及答案解析(总分:68.00,做题时间:90 分钟)一、选择题(总题数:25,分数:39.50)1.在窗体上画两个标签和一个命令按钮,其名称分别为 Labell、Label2 和 Command1,然后编写如下程序:Private Sub func(L As Label,ByVal a As Integer) L.Caption=“1234“ a=a*a End Sub Private Sub Form_Load() Label1.Caption=“ABCD“ Label2.Caption=10 End Sub Private Sub Command1
2、_Click() a=Val(Label2.Caption) Call func(Labell,A) Label2.Caption=a End Sub 程序运行后,单击命令按钮,在两个标签 Label1 和 Label2 中显示的内容分别是 _。(分数:1.00)A.ABCD 和 10B.1234 和 100C.ABCD 和 100D.1234 和 102.有如下程序: Option Base 1 Private Sub Form Click() Dim arr,Sum Sum=0 alt=Array(1,3,5,7,9,11,13,15,17,19) For i=1 To 10 If arr
3、(i)/3=arr(i)/3 Then Sum=Sum+arr(i) End If Next i Print Sum End Sub 程序运行后,单击窗体,输出结果为_。(分数:1.00)A.25B.26C.27D.283.在深度为 5 的满二叉树中,叶子结点的个数为 _。(分数:1.00)A.32B.31C.16D.154.Visual Basic 中的“启动对象”是指启动 Visual Basic 应用程序时,被自动加载并首先执行的对象。下列关于 Visual Basic“启动对象”的描述中,错误的是(分数:2.50)A.“启动对象”可以是指定的标准模块B.“启动对象”可以是指定的窗体C.
4、“启动对象”可以是 Sub Main 过程D.若没有经过设置,则默认的“启动对象”是第一个被创建的窗体5.在窗体上画一个命令按钮,名称为 Commandl。然后编写如下程序: Private Sub Command1_Ctick() For I=1 TO 2 For J=1 TO I Print String(I,“Hello“); Next J Print Next I End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是(分数:2.00)A.HHHHHB.HHHHHC.HHHHHD.HHHHHHH6.在计算机中,算法是指 _。(分数:2.00)A.查询方法B.加工方法C.解
5、题方案的准确而完整的描述D.排序方法7.有弹出式菜单的结构如下表,程序运行时,单击窗体则弹出如下图所示的菜单。下面的事件过程中能正确实现这一功能的是 (分数:2.00)A.Private Sub Form_Click()PopupMenu cutEnd SubB.Private Sub Command1 Click()PopupMenu editEnd SubC.Private Sub Form_Click()PopupMenu editEnd SubEnd SubD.Private Sub Form_lick()PopupMenu cutPopupMenu paste8.窗体上有一个名称为
6、Text1 的文本框,一个名称为 Command1 的命令按钮。以下程序的功能是从顺序文件中读取数据: Private Sub Command1_Click() Dim s1 As String, s2 As String Open “c:/d4.dat“ For Append As #3 Line Input#3, s1 Line Input#3, s2 Text1.Text=s1+s2 Close End Sub 该程序运行时有错误,应该进行的修改是(分数:2.00)A.将 Open 语句中的 ForAppend 改为 ForInputB.将 LineInput 改为 LineC.将两条
7、Line Input 语句合并为 Line Input #3, s1, s2D.将 Close 语句改为 Close #39.在关系数据库中,实现主码标识元组的作用是通过_。(分数:1.00)A.实体完整性规则B.参照完整性规则C.用户自定义的完整性D.属性的值域10.下面子过程语句说明合法的是_。(分数:2.00)A.Sub f1(sl As String*8)B.Sub f1(nAs Integer)As IntegerC.Function f1(f1 As Integer)As IntegerD.Function f1(ByVal n As Integer)11.设有语句: Temp=M
8、sgBox(“继续执行吗“,vbYesNo,“退出提示框“) 程序运行时,在对话框的标题栏将显示 _ 。(分数:1.00)A.继续执行吗B.vbYesNoC.退出提示框D.Temp12.确定个控件在窗体上的位置的属性是(分数:1.00)A.Width 和 fteightB.Width 或 IteightC.Top 和 LeftD.Top 或 Left13.在窗体上画一个列表框和一个命令按钮,其名称分别为 List1 和 Command1,然后编写如下事件过程: Private Sub Form_Load() List1. AddItem“Item1“ List1AddItem“Item2“ L
9、ist1. AddItem“Item3“ End Sub Private Sub Command1_Click() List1. List(List1. ListCount)=“AAAA“ End Sub 程序运行后,单击命令按钮,其结果为_。(分数:2.00)A.把字符串“AAAA”添加到列表框中,但位置不能确定B.把字符串“AAAA”添到列表框的最后(即“Item3”的后面)C.把列表框之中原有的最后一项改为“AAAA”D.把字符串“AAAA”插入到列表框的最前面(即“Iteml”的前面)14.如果要改变窗体的标题,需要设置窗体对象的 _ 属性。(分数:1.00)A.NameB.Capti
10、onC.BackColorD.BorderStyle15.下列关于 Sub 过程的叙述正确的是 _ 。(分数:2.00)A.一个 Sub 过程必须有一个 Exit Sub 语句B.一个 Sub 过程必须有一个 End Sub 语句C.在 Sub 过程中可以定义一个 Function 过程D.可以用 Goto 语句退出 Sub 过程16.下列程序段的执行结果为 _。 X=5 Y=-20 If Not X0 Then X=Y-3 Else Y=X+3 Print X-Y; Y-X(分数:1.00)A.-3 3B.5 -8C.3 -3D.25 -2517.Visual Basic 中的数值可以用十六
11、进制或八进制表示,十六进制数的开头符号是H,八进制数的开头符号是 _ 。(分数:2.00)A.$OB.OC.$ED.E18.下列对变量的定义中,不能定义 a 为变体变量的是(分数:2.00)A.Dim a As DoubleB.Dim a As VariantC.Dim aD.a=2419.如果要将窗体中的某个命令按钮设置成不可见状态,应该设置命令按钮的什么属性(分数:2.00)A.ValueB.VisibleC.EnabledD.Default20.假定已在窗体上画了多个控件,其中有一个被选中,为了在属性窗口中设置窗体的属性,预先应执行的操作是_。(分数:1.00)A.单击窗体上没有控件的地
12、方B.单击任意一个控件C.双击任意一个控件D.单击属性窗口的标题栏21.在窗体上画 4 个文本框,并用这 4 个文本框建立一个控件数组,名称为 Text1(下标从 0 开始,自左至右顺序增大),然后编写下列事件过程: Private Sub Command1_Click() For Each TextBox In Text1 Text1(i)=Text1(i).Index i=i+1 Next End Sub 程序运行后,单击命令按钮,4 个文本框中显示的内容分别为 _ 。(分数:2.00)A.0 1 2 3B.1 2 3 4C.0 1 3 2D.出错信息22.下列关于结构化设计方法的特点描述
13、中,不正确的是 _ 。(分数:1.00)A.采用逐步求精的方法进行详细设计,由于相邻步之间变化小,易于验证其等效性和设计正确性B.程序清晰和模块化使得修改和重新设计一个软件时使用的代码量不大C.在进行程序设计时不能使用 goto 语句D.良好清晰的控制结构使设计容易阅读和理解23.在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮,然后编写如下事件过程: Private Sub Comandl_Click() Dim arrayl(10, 10)As Integer Dim i As Integer, j As Integer For i=1 To 3 For
14、 j=2 To 4 arrayl(i, j)=i+j Next j Next i Text1. Text=arrayl(2, 3)+arrayl(3, 4) End Sub 程序运行后,单击命令按钮,在文本框中显示的值是_。(分数:2.00)A.15B.14C.13D.1224.在下列叙述中,不正确的一条是 _。(分数:1.00)A.数据库设计包括结构设计和行为设计两方面的内容B.数据库设计的关键是结构特征的设计C.数据库设计是数据库应用系统设计的核心部分D.数据库的物理设计和具体的 DBMS 的类型无关25.下面语句中能够打开随机文件的是(分数:2.00)A.Open“file.txt“Fo
15、r Random As #1B.Open“file.txt“ For Input As #1C.Open“file.txt“ For Output As #1D.Open“file.txt“ For Append As #1二、填空题(总题数:14,分数:28.50)26.设一棵完全二叉树共有 500 个结点,则在该二叉树中有 _ 1_ 个叶子结点。 (分数:1.00)27.数据结构包括数据的逻辑结构、数据的 _ 1_ 以及对数据的操作运算。 (分数:2.00)28.数据模型按不同应用层次分成 3 种类型,它们是概念数据模型、 1 和物理数据模型。 (分数:2.00)29.通用对话框控件可通过
16、调整其 Action 属性而改变成各种实用的对话框,但它不能改变成 1 对话框。 (分数:2.00)30.假设线性表的长度为 n,则在最坏情况下,冒泡排序需要的比较次数为 _ 1_ 。 (分数:1.00)31.单击命令按钮后,下列程序代码的执行结果是 1 。 Public Sub fun (Byval a () As Integer) Static n As Integer Do a(n) = a (n) + a(n + 1) n = n + 1 Loop While n 3 End Sub Private Sub command1_ click() Dim m As Integer, n A
17、s Integer, a(10) As Integer For n = 0 To 2: a(n) = n + 1: Next n For n = 1 To 2: Call fun(a): Next n For n = 0 To 3: Print a(n): Next n End Sub (分数:2.00)在窗体上画两个文本框(名称分别为 Text1 和 Text2)和一个命令按钮(名称为 Command1),然后编写如下事件过程: Private Sub Command1 Click( ) Text1.Text = InputBox(“请输入数据 1“) Text2.Text = InputB
18、ox(“请输入数据 2) End Sub 程序运行后,如果单击命令按钮,将先后显示两个输入对话框,在两个输入对话框中分别输入 123 和abc,则两个文本框中显示的内容分别为 7 和 8 。(分数:4.00)32.要使一个文本框具有水平和垂直滚动条,应先将其 MultiLine 属性设置为 True,然后再将 ScrollBar属性设置为 1。 (分数:2.00)33.下列程序弹出对话框中按钮的个数为 1。 MsgBox“确认!“,vbAbortRetryIgnore+vbMsgBoxHelpButton+vbQuestion,“提示“ (分数:2.00)34.在窗体上面画一个命令按钮,然后编
19、写如下程序: Function M(x As Integer, y As Integer) As Integer M = IIf(xy, x, y) End Function Private Sub Command1_Click() Dim a As Integer, b As Integer a = 2 b = 5 Print M(a, b) End Sub 程序运行后,单击命令按钮,输出结果为 _ 1_ 。 (分数:2.50)35.在程序设计阶段应该采取 1 和逐步求精的方法,把一个模块的功能逐步分解,细化为一系列具体的步骤,继而用某种程序设计语言写成程序。 (分数:2.00)36.栈的基
20、本运算有三种:入栈、退栈和 _ 1_ 。 (分数:2.00)37.软件测试可分为白盒测试和黑盒测试。基本路径测试属于 1 测试。 (分数:2.00)38.数据库系统的三级模式分别为 _ 1_ 模式、内部级模式与外部级模式。 (分数:2.00)二级 VISUAL+BASIC-10-1 答案解析(总分:68.00,做题时间:90 分钟)一、选择题(总题数:25,分数:39.50)1.在窗体上画两个标签和一个命令按钮,其名称分别为 Labell、Label2 和 Command1,然后编写如下程序:Private Sub func(L As Label,ByVal a As Integer) L.C
21、aption=“1234“ a=a*a End Sub Private Sub Form_Load() Label1.Caption=“ABCD“ Label2.Caption=10 End Sub Private Sub Command1_Click() a=Val(Label2.Caption) Call func(Labell,A) Label2.Caption=a End Sub 程序运行后,单击命令按钮,在两个标签 Label1 和 Label2 中显示的内容分别是 _。(分数:1.00)A.ABCD 和 10B.1234 和 100C.ABCD 和 100D.1234 和 10 解
22、析:解析 单击命令按钮后变量 a 赋初值 a=10,通过 Call 调用函数后,Labell.Caption=“1234“,而由于参数 a 是按值传递的,所以调用完函数后变量 a 的值在单击事件中并没有改变,所以执行语句Label2Caption=a 后, Label2 中显示的值仍为 10。2.有如下程序: Option Base 1 Private Sub Form Click() Dim arr,Sum Sum=0 alt=Array(1,3,5,7,9,11,13,15,17,19) For i=1 To 10 If arr(i)/3=arr(i)/3 Then Sum=Sum+arr
23、(i) End If Next i Print Sum End Sub 程序运行后,单击窗体,输出结果为_。(分数:1.00)A.25B.26C.27 D.28解析:解析 Option Base 1 表示数组的下标是从 1 开始的。本题中先定义arr=Array(1,3,5,7,9,11,13,15,17,19),即 a(1)=1,a(2)=3,a(3)=5,a(4)=7,a(5)=9,a(6)=11,a(7)=13,a(8)=15,a(9)-17,a(10)=19,而在循环语句中就是要求把能被 3 整除的数加起来,即 4(2)+a(5)+a(8)=3+9+15=27。3.在深度为 5 的满二
24、叉树中,叶子结点的个数为 _。(分数:1.00)A.32B.31C.16 D.15解析:解析 所谓满二叉树是指这样的一种二叉树:除最后一层外,每层上的所有结点都有两个子结点。这就是说,在满二叉树中,每一层上的结点数都达到最大值,即在满二叉树的第 K 层上有 2 k-1 个结点,且深度为 m 的满二叉树有 2 m 个结点。在满二叉树中,最后一层的结点个数就是叶子结点的个数,本题中深度为 5,故叶子结点数为 2 5-1 =2 4 =16。4.Visual Basic 中的“启动对象”是指启动 Visual Basic 应用程序时,被自动加载并首先执行的对象。下列关于 Visual Basic“启动
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
5000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 职业资格 二级 VISUALBASIC101 答案 解析 DOC
