1、全国计算机等级考试二级 VISUAL+BASIC 机试真题 2011 年 3 月及答案解析(总分：100.00，做题时间：90 分钟)一、1 基本操作题(总题数：2，分数：30.00)1.在名称为 Form1 的窗体上画两个标签(名称分别为 Label1 和 Label2，标题分别为“书名”和“作者”)、两个文本框(名称分别为 Text1 和 Text2，Text 属性均为空白)和一个命令按钮(名称为 Command1，标题为“显示”)，如图 1 所示。然后编写命令按钮的 Click 事件过程。程序运行后，在两个文本框中分别输入书名和作者，然后单击命令按钮，则在窗体的标题栏上先后显示两个文本框
2、中的内容，如图 2 所示。要求程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt1.vbp，窗体文件名为 sjt1.frm。（分数：15.00）_2.在名称为 Form1 的窗体上画一个标签，其名称为 Label1，标题为“计算机等级考试”，Left 属性为0；再画一个水平滚动条，其名称为 Hscroll1，在属性窗口中设置其属性如下：（分数：15.00）_二、2 简单应用题(总题数：2，分数：40.00)3.在考生目录下有一个工程文件 sjt3.vbp，窗体上有一个组合框 Combo1，其中已经预设了内容；还有一个文本框 Text1 和三个命令按钮，名称分别为
3、Command1、Command2、Command3，标题分别为“修改”、“确定”、“添加”。程序运行时，“确定”按钮不可用，如下图所示。程序的功能是：在运行时，如果选中组合框中的一个列表项，单击“修改”按钮，则把该项复制到 Text1中(可在 Text1 中修改)，并使“确定”按钮可用；若单击“确定”按钮，则把修改后的 Text1 中的内容替换组合框中该列表项的原有内容，同时使“确定”按钮不可用；若单击“添加”按钮，则把在 Text1 中的内容添加到组合框中。所提供的窗体文件已经给出了所有控件和程序，但程序不完整，请去掉程序中的注释符，把程序中的“?”改为正确的内容。但不能修改程序中的其他部
4、分，也不能修改控件的属性。最后把修改后的文件按原文件名存盘。（分数：20.00）_4.在考生文件夹下有一个工程文件 sjt4.vbp(相应的窗体文件名为 sjt4.frm)，其功能是通过调用过程Average 求数组的平均值，请装入该文件。程序运行后，在 4 个文本框中各输入一个整数，然后单击命令按钮，即可求出数组的平均值，并在窗体上显示出来(如下图所示)。这个程序不完整，请把它补充完整，并能正确运行。要求：去掉程序中的注释符，把程序中的“?”改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。（分数：20.00）_三、3 综合应用题(总题数：1，分
5、数：30.00)5.以下数列：1，1，2，3，5，8，13，21，的规律是从第 3 个数开始，每个数是它前面两个数之和。在考生文件夹下有一个工程文件 sjt5.vbp。窗体中已经给出了所有控件，如下图所示。请编写适当的事件过程完成以下功能：选中一个单选按钮后，单击“计算”按钮，则计算出上述数列的第 n 项的值，并显示在文本框中，n 是选中的单选按钮后面的数值。(提示：因计算结果较大，应使用长整型变量。)注意：不能修改已经给出的程序和已有的控件的属性；在结束程序运行之前，必须选中一个单选按钮，并单击“计算”按钮获得一个结果；必须使用窗体右上角的关闭按钮结束程序，否则无成绩。最后把修改后的文件按原
6、文件名存盘。（分数：30.00）_全国计算机等级考试二级 VISUAL+BASIC 机试真题 2011 年 3 月答案解析(总分：100.00，做题时间：90 分钟)一、1 基本操作题(总题数：2，分数：30.00)1.在名称为 Form1 的窗体上画两个标签(名称分别为 Label1 和 Label2，标题分别为“书名”和“作者”)、两个文本框(名称分别为 Text1 和 Text2，Text 属性均为空白)和一个命令按钮(名称为 Command1，标题为“显示”)，如图 1 所示。然后编写命令按钮的 Click 事件过程。程序运行后，在两个文本框中分别输入书名和作者，然后单击命令按钮，则在
7、窗体的标题栏上先后显示两个文本框中的内容，如图 2 所示。要求程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt1.vbp，窗体文件名为 sjt1.frm。（分数：15.00）_正确答案：(第一步：建立工程和添加窗体单击考试界面的“功能”选项，从弹出的菜单中选择“启动应用程序”选项。启动 Visual Basic 后，在“新建工程”对话框中选择“新建”项目中的“标准 EXE”，然后单击“打开”按钮，建立一个新的工程文件，里面会同时自动建立一个名为 Form1 的窗体文件。第二步：设计窗体在窗体上画出两个文本框、两个标签和一个命令按钮，并分别将它们的 Caption
8、 属性按照试题要求的内容进行设置。第三步：编写代码1 Private Sub Command1_Click( )2 Form1.Caption= Form1.Text1.Text &“，作者“ & Text2 Text3 End Sub第四步：保存对程序进行调试，确定无误后，把程序存放在考生文件夹下。)解析：解析 首先按试题要求在窗体上画出两个文本框、两个标签和一个命令按钮，并分别将它们的Caption 属性按照试题要求的内容进行设置。由于试题中要求不能使用任何变量，那么可以将“Text1.Text”和“Text2.Text”视为变量来处理，将其与其他字符串用“&”或者“+”连接起来。2.在名
9、称为 Form1 的窗体上画一个标签，其名称为 Label1，标题为“计算机等级考试”，Left 属性为0；再画一个水平滚动条，其名称为 Hscroll1，在属性窗口中设置其属性如下：（分数：15.00）_正确答案：(第一步：启动 Visual Basic，新建一个工程文件。第二步：在窗体上画出一个水平滚动条，并将它的属性按试题要求进行设置。第三步：编写程序源代码：1 Prirate Sub HScroll1 Change( )2 Label1.Left=Me.HScroll13 End Sub45 Private Sub HScroll1_Scroll( )6 Label1.Left = F
10、orm1HScroll17 End Sub第四步：调试并运行程序，运行正确后保存。程序设计完成经调试无误后进行存盘。以 Stj2.vbp 和sjt2.frm 进行保存。)解析：解析 首先按试题要求在窗体上画出一个水平滚动条，并将它的属性按试题要求进行设置。当单击滚动条时，系统会触发 Change 事件，只要将 HScroll1.Value 赋值给 Label1.left 就能满足试题的要求。二、2 简单应用题(总题数：2，分数：40.00)3.在考生目录下有一个工程文件 sjt3.vbp，窗体上有一个组合框 Combo1，其中已经预设了内容；还有一个文本框 Text1 和三个命令按钮，名称分别
11、为 Command1、Command2、Command3，标题分别为“修改”、“确定”、“添加”。程序运行时，“确定”按钮不可用，如下图所示。程序的功能是：在运行时，如果选中组合框中的一个列表项，单击“修改”按钮，则把该项复制到 Text1中(可在 Text1 中修改)，并使“确定”按钮可用；若单击“确定”按钮，则把修改后的 Text1 中的内容替换组合框中该列表项的原有内容，同时使“确定”按钮不可用；若单击“添加”按钮，则把在 Text1 中的内容添加到组合框中。所提供的窗体文件已经给出了所有控件和程序，但程序不完整，请去掉程序中的注释符，把程序中的“?”改为正确的内容。但不能修改程序中的其
12、他部分，也不能修改控件的属性。最后把修改后的文件按原文件名存盘。（分数：20.00）_正确答案：(第一步：启动 Visual Basic，打开考生文件夹下的工程文件。第二步：双击窗体的任何部分，进入程序编写代码窗口，修改程序如下：1 Private Sub Command1_Click( )2 Text1=Combo1.Text3 Command2.Enabled=True4 Command2.Enabled=True5 End Sub67 Private Sub Command2_Click( )8 Combo1.List(Combo1.List Index)=Text19 Combo1.L
13、ist( Form1.Combo1.ListIndex)=Text110 Text1=“11 Command2.Enabled=False12 End Sub1314 Private Sub Command3_Click( )15 Combo1.AddItera Text116 Form1.Combol.AddItem Text117 End Sub第三步：修改完毕，调试正确后将工程与窗体以原文件名保存到考生文件夹下。)解析：解析 Enabled 属性允许在运行时使窗体和控件成为有效或无效，ListIndex 设置控件中当前选择项目的索引，AddItem 用于将项目添加到 ListBox 控件
14、。4.在考生文件夹下有一个工程文件 sjt4.vbp(相应的窗体文件名为 sjt4.frm)，其功能是通过调用过程Average 求数组的平均值，请装入该文件。程序运行后，在 4 个文本框中各输入一个整数，然后单击命令按钮，即可求出数组的平均值，并在窗体上显示出来(如下图所示)。这个程序不完整，请把它补充完整，并能正确运行。要求：去掉程序中的注释符，把程序中的“?”改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。（分数：20.00）_正确答案：(第一步：启动 Visual Basic，打开考生文件夹下的工程文件 sjt4.vbp。第二步：双击窗体
15、中的命令按钮，进入代码编辑窗口，对确定按钮的单击事件进行代码编辑如下：1 Option Base 12 Private Function Average(a( )A0Integer)As Single3 Dim Start As Integer，FinishAs Integer4 Dim i As Integer5 Dim Sum As Integer6 Start=LBound(a)7 Finish=UBound(a)8 Sum=09 For i=Start To Finish10 Sum=Sum+a(i)11 Next i12 Average=Sum/Finish13 End Functi
16、on14 Private Sub Command1_Click( )15 Dim arr116 Dim art2(4)As Integer17 arr1=Array(Val(Text1.Text)，Val(Text2.Text)，Val(Text3.Text)，Val(Text4.Text)18 For i=1 To 419 arr2(i)=CInt(arr1(i)20 Next i21 Aver=Average(art2( )22 Print“平均值是：“；Aver23 End Sub第三步：填写完毕，调试成功后，以原文件名保存。)解析：解析 使用 LBound 函数来返回数组的指定维数的最
17、小可用下标，使用 UBound 函数确定数组的指定维数的最大可用下标。三、3 综合应用题(总题数：1，分数：30.00)5.以下数列：1，1，2，3，5，8，13，21，的规律是从第 3 个数开始，每个数是它前面两个数之和。在考生文件夹下有一个工程文件 sjt5.vbp。窗体中已经给出了所有控件，如下图所示。请编写适当的事件过程完成以下功能：选中一个单选按钮后，单击“计算”按钮，则计算出上述数列的第 n 项的值，并显示在文本框中，n 是选中的单选按钮后面的数值。(提示：因计算结果较大，应使用长整型变量。)注意：不能修改已经给出的程序和已有的控件的属性；在结束程序运行之前，必须选中一个单选按钮，
18、并单击“计算”按钮获得一个结果；必须使用窗体右上角的关闭按钮结束程序，否则无成绩。最后把修改后的文件按原文件名存盘。（分数：30.00）_正确答案：(第一步：单击考试界面的“功能”选项，从弹出的菜单中选择“启动应用程序”选项。Visual Basic 启动后，打开考生文件夹下的工程文件。第二步：双击窗体的任何部分，进入程序编写窗口，补充程序如下：1 Private Sub Command1_Click( )2 Dim a As Long，a1 As Long，a2As Long3 Dim k As Integer, n As Integer4 For k=0 To 25 If Opl(k)Va
19、lue Then6 n=Val(Opl(k).Caption)7 End If8 Next k9 a1=110 a2=111 For k=3 To n12 a=a1+a213 a1=a214 a2=a15 Next k16 Text1.Text=a17 End Sub第三步：填写完毕，调试程序，确定无误后，将工程与窗体按原文件名保存在考生文件夹下。)解析：解析 本题考查 for 循环的应用，循环是在指定的条件下多次重复执行一条语句，Visual Basic中提供了多种形式的循环结构，而 for 循环就是其中的一种。for 循环用于控制循环次数预知的情况，语句形式如下：For 循环变量=初值 to 终值Step 步长语句块exit for语句块next 循环变量其中：循环变量必须为数值型。步长：一般为正，初值小于终值；若为负，则初值大于终值；缺省时步长为 1。语句块：可以是一句或多句语句，称为循环体。
