1、国家二级 VB机试(上机操作)模拟试卷 104及答案与解析 一、基本操作题 1 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。 (1)在名称为 Forml的窗体上画一个名称为 Combol的组合框,其宽度为 1200,其类型如图3 102所示 (即简单组合框 )。要求如下: 请按图中所示,通过属性窗口输入 “北京 ”、 “上海 ”、 “广州 ”、 “深圳 ”。 设置适当的属性,使得运行时,窗体的最大化按钮和最小化按钮消失。注意:存盘时必须存放在考生文件夹下,工程文件名为 sjtl vbp,窗体文件名为 sitl fm。 (2)在名称为 Forml的窗体上画
2、两个文本框,名称分别为 Text1、 Text2,再画两个命令按钮,名称分别为Command1、 Command2,标题分别为 “左 ”、 “右 ”,如图 3-103。要求:编写适当的事件过程,使得程序运行时,单击 “左 ”按钮,则焦点位于 Text1上;单击 “右 ”按钮,则焦点位于 Text2上。注意:程序巾不得使用变量,事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为 sjt2-Vbp,窗体文件名为 sjt2 frm。 二、简单应用题 2 (1)在考生目录下有 一个工程文件 sit3 vbp,包含了所有控件和部分程序,如图 3一 180所示。要求如下: 利用属性窗口设
3、置适当的属性,使 Text1、 Text2中数据右对齐; 请编写适当的程序完成以下功能:在 Text1中输入 40(度数 ),选择组合框中的一个项目,单击 “计算 ”按钮,则根据所选择的项目,计算出相应的正弦、余弦值 (保留 3位小数,第 4位截去, 取 3 14159),并显示在 Text2中。注意:考生不得修改窗体文件中已经存在的程序,在结束程序运行之前,必须进行一种计算;在 Text1中输入的必须是 40;必须用窗体右上角的关闭 按钮结束程序,否则无成绩。最后按原文件名存盘。 (2)在考生文件夹下有一个工程文件 sjt4 vbp,窗体上已经画出所有控件。程序的作用是构成一个简单的时钟。刚
4、运行时,不计时,选择一个单选按钮后,再单击 “计时 ”按钮,则开始计时,并根据所选的单选按钮决定是每秒显示一次秒数,还是每 10秒显示一次秒数。 Text2用于显示秒,如图 3一 181所示。窗体文件中已经给出了程序,但不完整,请去掉程序中的注释符,把程序中的 ?改为正确的内容。注意:不得修改已经给出的程序。最后把修改后的文件按原文件名存盘。 三、综合应用题 3 在考生文件夹下有一个工程文件 sit5 vbp,在该工程文件中已经定义了一个学生记录类型数据 StudType。有三个标题分别为 “学号 ”、 “姓名 ”和 “平均分 ”的标签;三个初始内容为空,用于接收学号、姓名和平均分的文本框 T
5、ext1、 Text2和 Text3;一个用于显示排序结果的图片框。还有两个标题分别为 “添加 ”和 “排序 ”的命令按钮,如图 3192所示。程序功能如下: 在 Text1、 Text2和 Text3三个文本框中输入学号、姓名和平均分后,单击 “添加 ”按钮,则将输入内容存入自定义的学生记录类型数组 stud中 (注:最多只能输入 10个学生信息,且学号不能为窄 ); 单击“排序 ”按钮,则将学生记录类型数组 stud中存放的学生信息,按平均分降序排列的方式显示在图片框中,每个学生一行,且显示三项信息。请将 “添加 ”按钮、 “排序 ”按钮的 Click事件过程中的注释符去掉,把 ?改为正确
6、的内容,以实现上述程序功能。注意:考生不得修改窗体文件中已经存在的控件和程序,最后把修改后的文件按原文件名存盘。 国家二级 VB机试(上机操作)模拟试卷 104答案与解析 一、基本操作题 1 【正确答案】 第 1小题 【操作步骤】 步骤 1:新建一个 “标准 EXE”工程,按要求画出控件并设置属性。 步骤 2:按要求将文件保存至考生文件夹中。 第 2小题 【操作步骤】 步骤 1:新建一个 “标准 EXE”工程,按要求画出控件并设置属性。 步骤 2:双击 “左 ”命令按钮,打开代码编辑窗口,在按钮的 Click事件过程中输入代码。 步骤 3:从代码编辑窗口的 “对象 ”下拉列表中选择 Comma
7、nd2,从 “事件 ”下拉列表选择 Click,编写以下事件过程。 参考代码: Private Sub Commandl Click() Text1 SetFocus End Sub Private Sub Command2 Click() Text2 SetFocus End Sub 步骤 4:按要求将文件保存至考生文件夹中。 二、简单应用题 2 【正确答案】 第 l小题 【操作步骤】 步骤 1:打开考生文件夹中的工程文件 sjt3 vbp,依次选中窗体中的两个文本框,将其 Alignment属性值设置为 1-Right Justify。 步骤 2:双击窗体中的 “计算 ”命令按钮,在打开的
8、代码编辑窗口中编写其单击事件过程。 参考代码: Private Sub Commandl Click() Const PI=3 1 4 1 5 9 Select Case Comb01 Text Case ”sin”: a = Sin(CInt(Text1 Text) *PI 180) Case “Cos”: a = Cos(CInt(Textl Text) * PI 1 8 0) End Select Text2=Int(a* 1 0 0 0) 1 0 0 0 End Sub 步骤 3:按 键运行程序,在左侧文本框中输入 “40”,选择不同选项,单击 “计算 ”按钮。 步骤 4:单击窗体右上
9、角的关闭按钮以结束程序。 步骤 5:按要求将文件保存至考生文件夹中。 第 2小题 【操作步骤】 步骤 1:打开考生文件夹中的本题工程文件 sjt4 vbp,在代码编辑窗口,去掉程序中的注释符 “”,将问号 “?”改为正确的内容。 参考代码: num=num+1 Text2 Text=Text2 Text + 10 Textl Text=Text1 Text+ 1 步骤 2:按要求将文件保存至考生文件夹中。 三、综合应用题 3 【正确答案】 【操作步骤】 步骤 1:打开考生文件下的本题工程文件 sjt5 vbp,在代码编辑窗口,去掉程序中的注释符 “”,将问号 “?”改为正确的内容。 参考代码: n=n一 1 stud(n) Num: Text1 For k=j + 1 To n If std(k) Averagestud(j) AVerage Then stud(k) =stud(j) 步骤 2:按要求将文件保存至考生文件夹中。
copyright@ 2008-2019 麦多课文库(www.mydoc123.com)网站版权所有
备案/许可证编号:苏ICP备17064731号-1