1、国家二级 VB 机试（上机操作）-试卷 2 及答案解析(总分：6.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 Visual Basic 应用程序(包括界面和代码)。 (1)在名称为 Forml 的窗体上建立一个名称为 cmdArray 的命令按钮数组，含 3 个命令按钮，它们的 Index 属性分别为 0、1、2，标题依次为“是”、“否”、“取消”，每个按钮的高、宽均为 400、900。窗体的标题为“按钮示例”。运行后的窗体如图 226 所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为 vbsjlvbp，窗体文件名为 vbsi
2、1frm。 (2)在名称为 Forml 的窗体上画一个名称为 Drv1 的驱动器列表框，一个名称为Dir1 的目录列表框，一个名称为 Filel 的文件列表框，名称为 Labell、标题为“文件名”的标签和名称为 Label2、BorderStyle 为 1 的标签。窗体的标题设置为“文件系统控件”。请编写适当的程序，使得这三个文件系统控件可以同步变化，即当驱动器列表框中显示的内容发生变化时，目录列表框和文件列表框中显示的内容同时发生变化。单击文件列表框时，将选中的文件名显示在 Label2 中，如图 227 所示。（分数：2.00）_二、简单应用题(总题数：1，分数：2.00)2.(1)在考
3、生文件夹下有工程文件 sjt3vbp。程序运行时的窗体如图 2185(a)所示。输入商品名称后，选中一种付款方式，则“成交”按钮变为可用，选择一种或多种“服务”后，单击“成交”按钮，则把相应信息显示在下面的图片框中，如图 2185(b)所示。若不选任何“服务”，则显示结果如图 2185(c)所示。单击“放弃”按钮，则恢复到图(a)状态。 程序已经给出但不完整，请将其中的注释符去掉，把?改为正确的内容，以实现上述程序功能。 注意：考生不得修改窗体文件中已经存在的控件和程序，最后程序按原文件名存盘。 (2)在考生文件夹下有工程文件 sjt4vbp，其中的列表框中已经有两个列表项(均为数字)。程序功
4、能是在文本框中输入一个整数 n(例如 30)，单击命令按钮，则在列表框中追加若干数字，所有追加的数字按以下规律排列：每个数是前面两个数之和，最后一个数是满足上述规律的最大的小于 n 的数。如图 2186(a)所示。若再输入一个更大的整数(如 100)，单击命令按钮，则按上述规律继续追加数字。如图 2186(b)所示。 程序已经给出但不完整，请将其中的注释符去掉，把?改为正确的内容，以实现上述程序功能。 注意：考生不得修改窗体文件中已经存在的控件和程序，最后程序按原文件名存盘。 （分数：2.00）_三、综合应用题(总题数：1，分数：2.00)3.在考生文件夹下有一个工程文件 sit5vbp，窗体
5、如图 225 所示。运行程序时，从数据文件中读取学生的成绩(均为整数)。要求编写程序，统计总人数，并统计不及格、6069、7079、8089 及 90100各分数段的人数，将统计结果显示在相应的文本框中。结束程序之前，必须单击“保存”按钮，保存统计结果。 注意：不能修改程序的其他部分和控件属性。程序调试通过后，运行程序，将统计结果显示在文本框中，再按“保存”按钮保存数据，否则无成绩。最后把修改后的文件按原文件名存盘。 （分数：2.00）_国家二级 VB 机试（上机操作）-试卷 2 答案解析(总分：6.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的
6、要求设计 Visual Basic 应用程序(包括界面和代码)。 (1)在名称为 Forml 的窗体上建立一个名称为 cmdArray 的命令按钮数组，含 3 个命令按钮，它们的 Index 属性分别为 0、1、2，标题依次为“是”、“否”、“取消”，每个按钮的高、宽均为 400、900。窗体的标题为“按钮示例”。运行后的窗体如图 226 所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为 vbsjlvbp，窗体文件名为 vbsi1frm。 (2)在名称为 Forml 的窗体上画一个名称为 Drv1 的驱动器列表框，一个名称为Dir1 的目录列表框，一个名称为 Filel 的文件列表框，
7、名称为 Labell、标题为“文件名”的标签和名称为 Label2、BorderStyle 为 1 的标签。窗体的标题设置为“文件系统控件”。请编写适当的程序，使得这三个文件系统控件可以同步变化，即当驱动器列表框中显示的内容发生变化时，目录列表框和文件列表框中显示的内容同时发生变化。单击文件列表框时，将选中的文件名显示在 Label2 中，如图 227 所示。（分数：2.00）_正确答案：(正确答案：第 1 小题 【操作步骤】 步骤 1：新建一个“标准 EXE”工程，单击工具箱中的CommandButton 控件例标，在窗体 Forml 上拉出一个命令按钮，在属性设置窗口中该单选按钮名称设置为
8、cmdArray，Width 属件值设置为 900。Height 属性值设置为 400。 步骤 2；选中 cmdArray 控件，选择【编辑】【复制】命令，然后选择【编辑】【粘贴】命令，在弹出的询问是否建市控件数组的对话框中，选择“是”按钮，如图 3 一 1 所示，则可以建立 cmdArray 摔件数细的第 2 个元素。再次选择【编辑】【粘贴】命令建立 cmdArray 控件数组的第 3 个元素。 步骤 3：依次选中 cmdArray 控件数组中各个元素，设置它们的相关属件，属性及其值如表 316 所示。 步骤 4：按要求将文件保存争考生文件夹中。 第 2 小题 【操作步骤】 步骤 1：新建“
9、标准 EXE”工程，行窗体 Forml 中加入驱动器列表框、目录列表框控件、文件列表框控件各一个以及两个标签，分别设置它们的相关属性，属性及其值如表317 所示。 )解析：二、简单应用题(总题数：1，分数：2.00)2.(1)在考生文件夹下有工程文件 sjt3vbp。程序运行时的窗体如图 2185(a)所示。输入商品名称后，选中一种付款方式，则“成交”按钮变为可用，选择一种或多种“服务”后，单击“成交”按钮，则把相应信息显示在下面的图片框中，如图 2185(b)所示。若不选任何“服务”，则显示结果如图 2185(c)所示。单击“放弃”按钮，则恢复到图(a)状态。 程序已经给出但不完整，请将其中
10、的注释符去掉，把?改为正确的内容，以实现上述程序功能。 注意：考生不得修改窗体文件中已经存在的控件和程序，最后程序按原文件名存盘。 (2)在考生文件夹下有工程文件 sjt4vbp，其中的列表框中已经有两个列表项(均为数字)。程序功能是在文本框中输入一个整数 n(例如 30)，单击命令按钮，则在列表框中追加若干数字，所有追加的数字按以下规律排列：每个数是前面两个数之和，最后一个数是满足上述规律的最大的小于 n 的数。如图 2186(a)所示。若再输入一个更大的整数(如 100)，单击命令按钮，则按上述规律继续追加数字。如图 2186(b)所示。 程序已经给出但不完整，请将其中的注释符去掉，把?改
11、为正确的内容，以实现上述程序功能。 注意：考生不得修改窗体文件中已经存在的控件和程序，最后程序按原文件名存盘。 （分数：2.00）_正确答案：(正确答案：第 1 小题 【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件 sit3vbp，打斗代码编辑窗口，去掉程序中的注释符“”，将问号“?”改为正确的内容。 参考代码： If Checkl(k)Value=1 Then TextlText=” CommandlEnabled=True 步骤 2：按要求将文件保存至考生文件夹中。 第 2 小题 【操作步骤】 步骤 1：打开考生文件夹下的本题工程文件 sit4vbp，在代码编辑窗口，去掉程序中的注
12、释符“”，将问号“?”改为正确的内容。 参考代码： a=Val(List1List(ListlListCount 一 2) a=b List1AddItem c 步骤 2：按要求将文件保存至考生文件夹中。)解析：三、综合应用题(总题数：1，分数：2.00)3.在考生文件夹下有一个工程文件 sit5vbp，窗体如图 225 所示。运行程序时，从数据文件中读取学生的成绩(均为整数)。要求编写程序，统计总人数，并统计不及格、6069、7079、8089 及 90100各分数段的人数，将统计结果显示在相应的文本框中。结束程序之前，必须单击“保存”按钮，保存统计结果。 注意：不能修改程序的其他部分和控件
13、属性。程序调试通过后，运行程序，将统计结果显示在文本框中，再按“保存”按钮保存数据，否则无成绩。最后把修改后的文件按原文件名存盘。 （分数：2.00）_正确答案：(正确答案：【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件 sit5vbp，在代码编辑窗口的指定位置编写以下代码： 参考代码： TextlText=n count1=0 count2=0 count3=0 count4=0 count5=0 count6=0 For i=1 To n Y=Int(arr(i)10) Select Case Y Case 1 2 3 t 4 l 5 countl=countl+1 Case 6 count2=count2+1 Case 7 count3=count3+1 Case 8 count4=count4+1 Case 9，10 count5=count5+1 End Select Next Text2Text=courtt1 Text3Text=count2 Text4Text=count3 Text5Text=count4 Text6Text=count5 步骤 2：按F5键运行程序，先单击“统计”按钮，冉单击“保存”按钮。 步骤 3：按要求将文件保存至考生文件夹中。)解析：
