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,单击“分解为”按钮。)解析: