1、国家二级 VB机试(上机操作)模拟试卷 386及答案解析(总分:6.00,做题时间:90 分钟)一、基本操作题(总题数:1,分数:2.00)1.请根据以下各小题的要求设计 Visual Basic应用程序(包括界面和代码)。 (1)在名称为 Form1的窗体上画一个名称为 C1、标题为“改变颜色”的命令按钮,窗体标题为“改变窗体背景色”。编写程序,使得单击命令按钮时,将窗体的背景颜色改为红色(&HFF&)。运行程序后的窗体如图 378所示。 要求:程序中不得使用变量,每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为 sjt1vbp,窗体文件名为 sjt1frm。 (2)
2、在名称为 Form1的窗体上画一个名称 Shapel的形状控件,在属性窗口中将其设置为圆形。画一个名称为 List1的列表框,并在属性窗口中设置列表项的值分别为1、2、3、4、5。将窗体的标题设为“图形控件”。单击列表框中的某一项,则将所选的值作为形状控件的填充参数。例如,选择 3,则形状控件中被竖线填充。如图 379所示。 (分数:2.00)_二、简单应用题(总题数:1,分数:2.00)2.(1)在考生文件夹下有一个工程文件 sjt3vbp。程序的功能是通过键盘向文本框中输入正整数。 在“除数”框架中选择一个单选按钮,然后单击“处理数据”按钮,将大于文本框中的正整数且能够被所选除数整除的 5
3、个数添加到列表框 List1中,如图 380所示。在窗体文件中已经给出了全部控件,但程序不完整。 要求:请去掉程序中的注释符,把程序中的“?”改为正确的内容,使其实现上述功能,但不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。 (2)在考生文件夹下有一个工程文件 sjt4vbp。程序运行后,单击“开始”按钮,图片自上而下移动,同时滚动条的滑块随之移动,每 05 秒移动一次。 当图片顶端移动到距窗体的下边界的距离少于 200时,再回到窗体顶部,重新向下移动,如图 381所示。在窗体文件中已经给出了全部控件,但程序不完整。 (分数:2.00)_三、综合应用题(总题数:1,分数:
4、2.00)3.在考生文件夹下有一个工程文件 sjt5vbp,窗体如图 382所示。运行程序时,从数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,并统计不及格、6069、7079、8089 及 90100各分数段的人数,将统计结果显示在相应的文本框中。结束程序之前,必须单击“保存”按钮,保存统计结果。 (分数:2.00)_国家二级 VB机试(上机操作)模拟试卷 386答案解析(总分:6.00,做题时间:90 分钟)一、基本操作题(总题数:1,分数:2.00)1.请根据以下各小题的要求设计 Visual Basic应用程序(包括界面和代码)。 (1)在名称为 Form1的窗体上画一
5、个名称为 C1、标题为“改变颜色”的命令按钮,窗体标题为“改变窗体背景色”。编写程序,使得单击命令按钮时,将窗体的背景颜色改为红色(&HFF&)。运行程序后的窗体如图 378所示。 要求:程序中不得使用变量,每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为 sjt1vbp,窗体文件名为 sjt1frm。 (2)在名称为 Form1的窗体上画一个名称 Shapel的形状控件,在属性窗口中将其设置为圆形。画一个名称为 List1的列表框,并在属性窗口中设置列表项的值分别为1、2、3、4、5。将窗体的标题设为“图形控件”。单击列表框中的某一项,则将所选的值作为形状控件的填充参
6、数。例如,选择 3,则形状控件中被竖线填充。如图 379所示。 (分数:2.00)_正确答案:(正确答案:(1)【操作步骤】 步骤 1:新建一个“标准 EXE”工程,在窗体 Form1中画一个命令按钮,设置相关属性,其属性及值如表 449所示。 步骤 2:打开代码编辑窗口,编写按钮的Click事件过程中。参考代码: PriVate Sub C1_Click() Form1BackColorHFF End Sub 步骤3:按要求将文件保存至考生文件夹中。 (2)【操作步骤】 步骤 1:新建一个“标准 EXE”工程。 步骤2:在窗体 Form1中加入一个列表框和一个形状控件,并分别如表 450设置
7、它们的相关属性。 )解析:二、简单应用题(总题数:1,分数:2.00)2.(1)在考生文件夹下有一个工程文件 sjt3vbp。程序的功能是通过键盘向文本框中输入正整数。 在“除数”框架中选择一个单选按钮,然后单击“处理数据”按钮,将大于文本框中的正整数且能够被所选除数整除的 5个数添加到列表框 List1中,如图 380所示。在窗体文件中已经给出了全部控件,但程序不完整。 要求:请去掉程序中的注释符,把程序中的“?”改为正确的内容,使其实现上述功能,但不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。 (2)在考生文件夹下有一个工程文件 sjt4vbp。程序运行后,单击“开始
8、”按钮,图片自上而下移动,同时滚动条的滑块随之移动,每 05 秒移动一次。 当图片顶端移动到距窗体的下边界的距离少于 200时,再回到窗体顶部,重新向下移动,如图 381所示。在窗体文件中已经给出了全部控件,但程序不完整。 (分数:2.00)_正确答案:(正确答案:(1)【操作步骤】 步骤 1:打开考生文件下的本题工程文件 sjt3vbp,在代码编辑窗口,去掉程序中的注释符“”,将问号“?”改为正确的内容。参考代码: If Option1Item(i)True Then yval(Option1(i)Caption) Do While i5 List1AddItem x 步骤 2:按要求将文件
9、保存至考生文件夹中。 (2)【操作步骤】 步骤 1:打开考生文件夹下的工程文件 sjt4vbp。 步骤2:进入代码编辑窗口,去掉程序中的注释符“”,将问号“?”改为正确的内容。参考代码: Timer1Interval500 VScrol11ValuePicture1Top Picture1Top0 步骤 3:按要求将文件保存至考生文件夹中。)解析:三、综合应用题(总题数:1,分数:2.00)3.在考生文件夹下有一个工程文件 sjt5vbp,窗体如图 382所示。运行程序时,从数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,并统计不及格、6069、7079、8089 及 9010
10、0各分数段的人数,将统计结果显示在相应的文本框中。结束程序之前,必须单击“保存”按钮,保存统计结果。 (分数:2.00)_正确答案:(正确答案:【操作步骤】 步骤 1:打开考生文件夹中的本题工程文件 sjt5vbp, 在代码编辑窗口的指定位置编写以下代码。参考 代码: Text1Textn count10:count20:count30; count40:count50:count60 For i1 To n yInt(arr(i)10) Select Case y Case 1,2,3,4,5 count1count11 Case 6 count2Count21 Case 7 count3count31 Case 8 count4count41 Case 9,10 countscount51 End Select Next Text2Textcount1 :Text3Text count2 Text4Textcount3 :Text5Text count4 Text6Textcount5 步骤2:按F5键运行程序,先单击“统计”按钮,再单击“保存”按钮。 步骤 3:按要求将文件保存至考生文件夹中。)解析:
copyright@ 2008-2019 麦多课文库(www.mydoc123.com)网站版权所有
备案/许可证编号:苏ICP备17064731号-1