1、国家二级 VB机试(上机操作)模拟试卷 203及答案与解析 一、基本操作题 1 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。 (1)在名称为 Forml的窗体上画两个文本框,其名称分别为 Textl和 Text2,内容分别为 “文本框 1”和 “文本框 2”,编写适当的事件过程。程序运行后,如果单击窗体,则Text1隐藏, Text2显示,如图 2-6(a)所示;如果双击窗体,则 Textl显示, Text2隐藏,如图 2 6(b)所示。 注意:程序中不得使用变量。 存盘时必须存放在考生文件夹下, 工程文件名为 sjtl vbo,窗体文件名为 sit1
2、frm。(2)在名称为 Forml的窗体上画一个文本框,其名称为 Text1,初始内容为窄白;再画一个水平滚动条,其名称为HS1, SmallChange属性为 4, LargeChange属性为 10, Min属性为 0, Max属性为200,编写适当的事件过程。程序运行后,如果在文本框内输入一个数值 (0200),然后单击窗体,则把滚动条的滚动框移到相应的位置,如图 2 7所示。 注意:程序中不要使用变量;存盘时必须存放在考生文件夹下,工程文件名为sit2 vbp,窗 体文件名为 sit2 frm。 二、简单应用题 2 (1)在考生目录下有一个工程文件 sit3 vbp,窗体上由一个单选按
3、钮数组,含三个单选按钮,均没有标题,请利用属性窗口,为单选按钮依次添加标题为 “北京 ”、 “上海 ”、 “广州 ”;再添加一个标题为 “显示 ”的命令按钮,如图 218所示。程序的功能是在运行时,如果选中一个单选按钮后,单击 “显示 ”按钮,则根据单选按钮的选中情况,在窗体上显示 “我的出生地是北京 ”、 “我的出生地是上海 ”或 “我的出生地是广州 ”。要求如下: 依次添加单选按钮标题为 “北京 ”、 “上海 ”、 “广州 ”;设初始选中的是 “上海 ”,添加命令按钮标题为 “显示 ”。 去掉程序中的注释符,把程序中的 ?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分,也不能
4、修改控件的其他属性。 最后把修改后的文件按原文件名存盘。 (2)。在考生目录下有一个工程文件 sit4 vbp,请在 Forml窗体中画三个标签,名称分别为B1、 B2、 L1,标题分别为 “字号 ”、 “字体 ”、 “计算机等级考试 ”,其中 L1的高为500,宽为 3000;再在 B1、 B2标签的下面画两个组合框,名称分别为 Cb1、Cb2,并为 Cbl添加项目: “10”、 “15”、 “20”,为 Cb2添加项目: “黑体 ”、 “隶书 ”、 “宋体 ”。请编写适当的事件过程,使得在运行时,当在 Cbl中选一种字号、Cb2中选一种字体时,标签 L1中的文字立即变为选定的字号和字体。如
5、图 2 19所示。 注意:考生不得修改窗体文件中已经存在的程序,在结束程序运行之前,必须选择一种字号和字体。必须用窗体右上角的关闭按钮结束程序,否则无成绩。最后,按原文件名存盘,程序中不得使用任何变量。 三、综合应用题 3 在考生文件夹中有一个工程文件 sjt5 vbp,如图 2 129所示。运行程序时,从文件 中读入矩阵数据并放入二维数组 a中。甲击 “计算 ”按钮时,将统计矩阵两个对角线的元素中能被 3整除的个数,统计结果显示在标签 lblFirst中;同时计算矩阵主对角线的元素之和,计算结果显示在标签 IblSecond中。已给出了部分程序,请编写“计算 ”命令按钮事件过程中的部分程序代
6、码,以便完成上述功能。 注意:不能修改程序的其他部分和摔件属性。最后把修改后的文件按原文件名存盘。程序调试通过后,必须执行程序,并用 “计算 ”按钮进行计算,否则无成绩。 国家二级 VB机试(上机操作)模拟试卷 203答案与解析 一、基本操作题 1 【正确答案】 第 1小题 【操作步骤】 步骤 1:新建一个 “标准 EXE”工程,住窗体中加入两个文本框并设置它们的相关属性,属性及其值如表 33所示。步骤 2:打开代码编辑窗口,输入如下代码: 参考代码: Private Sub FormClick() Textl ViSible=False Text2 ViSible=True End Sub
7、Private Sub FormDblClick() Textl ViSible=True Text2 ViSible=False End Sub 步骤 3:按要求将文件保存至考生文件夹中。 第 2小题 【操作步骤】 步骤 1:新建 “标准 EXE”工程,往窗体 Forml中加入一个文本框和一个水平滚动条,分别设置它们的相关属性,属性及其值如表 3-4所示。步骤 2:打开代码编辑窗口,输入如下代码: 参考代码: Private Sub FormClick() HSl Value=Val(Texti Text) End Sub 步骤 3:按要求将文件保存至考生文件夹中。 二、简单应用题 2 【正
8、确答案】 第 1小题 【操作步骤】 步骤 1:打开考生文件夹中的本 题工程文件 sjt3 vbp,依次选中窗体中的各单选按钮和命令按钮,设置它们的相关属性,其属性及值如表 3 12所示。 步骤 2:双击 “显示 ”命令按钮,打开代码编辑窗口,去掉程序中的注释符 ” ,将问号 “?”改为正确的内容。参考代码: PriVate Sub C1一 Click() FOr 1=0 To 2 If Opl(i) Value=True Then Print“我的出生地是 ”+Opl(i).Caption End If Next End Sub 步骤 3:按要求将文件保存至考生文件夹中。 第 2小题 【操作步
9、 骤】 步骤 1:打开考生文件夹中的本题工程文件 sjt4 vbp,如表 313画出三个标签和两个组合框并设置属性。 步骤 2:在代码编辑窗口,编写两个组合框的单击的单击事件过程。 参考代码: Private Sub CblClick() L1 FontSize=Cbl Text End Sub Private Sub Cb2一 Click() L1 Font=Cb2 Text End Sub 步骤 3:按键运行程序并选择一个字号和字体,然后单击窗体右上角的关闭按钮结束程序。 步骤 4:按要求将文件保存至考生文件夹中 。 三、综合应用题 3 【正确答案】 【操作步骤】 步骤 1:打开考生文件夹
10、下的本题工程文件 sjt5 vbp,在代码编辑窗口的指定位置编写以下代码: 参考代码: For k=1 To N Sum=Sum+a(k, k) If a(k, k) 3=Int(a(k, k) 3)Then Counter=Counter+1 End If If kNk+1 Then If a(k, Nk+1) 3=Int(a(k, N k+1) 3)Then Counter=Counter+1 End If End If Next iblSecond Caption=Sum iblFirst Caption=Counter 步骤 2:按 键运行程序,然后单击 “计算 ”按钮。 步骤 3:按要求将文件保存至考生文件夹中。
copyright@ 2008-2019 麦多课文库(www.mydoc123.com)网站版权所有
备案/许可证编号:苏ICP备17064731号-1