1、国家二级 VB 机试（上机操作）-试卷 131 及答案解析(总分：6.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 Visual Basic 应用程序(包括界面和代码)。 (1)在名称为 Forml 的窗体上建立一个如下表所示的下拉菜单，其中“设置”菜单项为灰色(不可用)，如图 258 所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjtlvbp，窗体文件名为 sjtlfrm。 (2)在名称为Forml 的窗体上面一个名称为 Hscrolll 的水甲滚动条，其最大刻度为 100，最小刻度为 0；再画两个单选按钮，名称分别为
2、Option1、Option2，标题分别为“最大值”、“最小值”，且都末选中，再通过属忡窗口设置适当属件使得程序刚运行时，焦点存滚动条上(如图 259 所示)。 请编写适当的事件过程，使得程序运行时，单击“最大值”单选按钮，则滚动条上的滚动框移到最有端：单击“最小值”单选按钮，则滚动框移到最左端。 注意：程序中不得使用变量，事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为 sjt2vbp，窗体文件名为 sjt2frm。 （分数：2.00）_二、简单应用题(总题数：1，分数：2.00)2.(1)在考生文件夹下有一个工程文件 sjt3vbp。窗体上有名称为 Timer1 的定时
3、器，以及名称为 Linel和 Line2 的两条水平直线。请用名称为 Shapel 的形状控件，在两条直线之间画一个宽和高都相等的形状，其显示形式为圆，并设置适当属性使其满足以下要求： 圆的顶端距窗体 Forml 顶端的距离为 360； 圆的颜色为红色(红色对应的值为&H000000FF&或&HFF)，如图 270 所示。 程序运行时，Shapel将在 Line1 和 Line2 之间运动。当 Shapel 的顶端到达 Linel 时，会自动改变方向而向下运动；当 Shapel的底部到达 Line2 时，会改变方向而向上运动。 文件中给出的程序不完整，请去抻程序中的注释符，把程序中的?改为正确
4、内容，使其实现上述功能。 注意：不能修改程序的其他部分和已给出控件的属性。最后将修改后的文件按原文件名存盘。 (2)在考生义件灾下有一个工程文件 sjt4vbp，包含了所有控件和部分程序，如图 271 所示。程序功能如下： （分数：2.00）_三、综合应用题(总题数：1，分数：2.00)3.在考生文件夹下有一个工程文件 sit5vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时，在文本框 Text1 中输入一个大于 2 的偶数，并单击“分解为”按钮，则可以将该偶数分解为两个素数之和，且要求其中一个素数是所能够分解出的最小的素数(一个偶数有时可以分解为多种素数的组合，例如 24 可以分
5、解为 5 和 19，也可以分解为 11 和 13，要求取含有最小素数的组合，如图 2124 所示)。要求编写“分解为”按钮事件过程中“考生编写程序开始”和“考生编写程序结束”之间的代码，以实现上述功能。过程 IsPrime 用来判断。个数是否为素数，如果是，返回值为 True，否则返回值为 False。 注意：不得修改原钉程序和控件的属性。至少正确运行一次程序，且运行时在文本框中输入 23456，单击“分解为”按钮，将结果显示在标签中，否则无成绩。最后把修改后的文件按原文件名存盘。 （分数：2.00）_国家二级 VB 机试（上机操作）-试卷 131 答案解析(总分：6.00，做题时间：90 分
6、钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 Visual Basic 应用程序(包括界面和代码)。 (1)在名称为 Forml 的窗体上建立一个如下表所示的下拉菜单，其中“设置”菜单项为灰色(不可用)，如图 258 所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjtlvbp，窗体文件名为 sjtlfrm。 (2)在名称为Forml 的窗体上面一个名称为 Hscrolll 的水甲滚动条，其最大刻度为 100，最小刻度为 0；再画两个单选按钮，名称分别为 Option1、Option2，标题分别为“最大值”、“最小值”，且都末选中，再通过属忡窗口设
7、置适当属件使得程序刚运行时，焦点存滚动条上(如图 259 所示)。 请编写适当的事件过程，使得程序运行时，单击“最大值”单选按钮，则滚动条上的滚动框移到最有端：单击“最小值”单选按钮，则滚动框移到最左端。 注意：程序中不得使用变量，事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为 sjt2vbp，窗体文件名为 sjt2frm。 （分数：2.00）_正确答案：(正确答案：第 1 小题 【操作步骤】 步骤 1：新建一个“标准 EXE”上程，利用菜单设计器按表 334 在窗体上建立一个二级菜单。 步骤 2：按要求将文件保存至考生文间夹中。 第 2 小题 【操作步骤】 步骤 1：新
8、建一个“标准 EXE”工程，按表 335 在窗体中画出控件并设置其相关属性。)解析：二、简单应用题(总题数：1，分数：2.00)2.(1)在考生文件夹下有一个工程文件 sjt3vbp。窗体上有名称为 Timer1 的定时器，以及名称为 Linel和 Line2 的两条水平直线。请用名称为 Shapel 的形状控件，在两条直线之间画一个宽和高都相等的形状，其显示形式为圆，并设置适当属性使其满足以下要求： 圆的顶端距窗体 Forml 顶端的距离为 360； 圆的颜色为红色(红色对应的值为&H000000FF&或&HFF)，如图 270 所示。 程序运行时，Shapel将在 Line1 和 Line
9、2 之间运动。当 Shapel 的顶端到达 Linel 时，会自动改变方向而向下运动；当 Shapel的底部到达 Line2 时，会改变方向而向上运动。 文件中给出的程序不完整，请去抻程序中的注释符，把程序中的?改为正确内容，使其实现上述功能。 注意：不能修改程序的其他部分和已给出控件的属性。最后将修改后的文件按原文件名存盘。 (2)在考生义件灾下有一个工程文件 sjt4vbp，包含了所有控件和部分程序，如图 271 所示。程序功能如下： （分数：2.00）_正确答案：(正确答案：第 1 小题 【操作步骤】 步骤 1：打开考生文件下的奉题工程文件 sit3。vbp 在窗体上两条水平直线间画一个
10、形状控件，并如表 342 设置其属性。 )解析：三、综合应用题(总题数：1，分数：2.00)3.在考生文件夹下有一个工程文件 sit5vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时，在文本框 Text1 中输入一个大于 2 的偶数，并单击“分解为”按钮，则可以将该偶数分解为两个素数之和，且要求其中一个素数是所能够分解出的最小的素数(一个偶数有时可以分解为多种素数的组合，例如 24 可以分解为 5 和 19，也可以分解为 11 和 13，要求取含有最小素数的组合，如图 2124 所示)。要求编写“分解为”按钮事件过程中“考生编写程序开始”和“考生编写程序结束”之间的代码，以实现上述
11、功能。过程 IsPrime 用来判断。个数是否为素数，如果是，返回值为 True，否则返回值为 False。 注意：不得修改原钉程序和控件的属性。至少正确运行一次程序，且运行时在文本框中输入 23456，单击“分解为”按钮，将结果显示在标签中，否则无成绩。最后把修改后的文件按原文件名存盘。 （分数：2.00）_正确答案：(正确答案：【操作步骤】 步骤 1：打开考生文件中的本题工程文件 sit5vbp，在代码编辑窗口的指定位置编写以下代码： 参考代码： Dim i As Integer Dim n As Integer n=Val(TextlText) If n Mod 20 Then NsgBox”请输入偶数!” Exit Sub End If For i=3 TO n2 If IsPrime(i)And IsPrime(ni)Then LabellCaption=i Label2Caption=ni EXit For End If Next 步骤 2：按要求将文件保存至考生文件夹中。 步骤 3：按F5键运行程序，在文本框中输入 23456，单击“分解为”按钮。)解析：
