1、国家二级 VB机试(上机操作)模拟试卷 229及答案与解析 一、基本操作题 1 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。 (1)在名称为 Forml的窗体上画一个名称为 Labell的标签,标签的宽和高分别为 2000、300,有边框,并利用属性窗口设置适当的属性,使其居中显示 “等级考试 ”,并使标签的外观如图 2 173所示。运行后的窗体见图 2 173。 注意:存盘时必须存放在考生文件夹下,工程文件名为 sjt1 vbp,窗体文件名为 sit1 frm。(2)在名称为 Forml的窗体上画一个名称为 lmagel的图像框,有边框,并可以自动调整
2、装入图片的大小以适应图像框的尺寸;再画三个命令按钮,名称分别为 Command1、 Command2、Command3,标题分别为 “红桃 ”、 “黑桃 ”、 “清除 ”。在考生目录下有两个图标文件,其名称分别为 “Misc34 ico”和 “Misc37 ico”。程序运行时,单击 “红桃 ”按钮,则在图像框中显示红桃图案 (即 Misc34 ico文件,如图 2 174所示 );单击“黑桃 ”按钮,则在图像框中显示黑桃图案 (即 Misc37 ico文件 ):单击 “清除 ”按钮,则 清除图像框中的图案。请编写相应控件的 Click事件过程,实现上述功能。 注意:要求程序中不得使用变量,每
3、个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为 sil2 vbp,窗体文件名为 sjt2.frm。 二、简单应用题 2 (1)在考生文件夹下有一个工程文件 vbsi3 vbp,相应的窗体文件名为vbsi3 frm。在窗体上有一个命令按钮,其名称为 cmdAdd,标题为 “添加 ”;有一个文本框,名称为 txtSentense,初始内容为空白;有一个列表框,名称为lstWord。程序运行后,在 文本框中输入一个英文句子 (由多个单词组成,各单词之间用一个空格分开 ),然后单击命令按钮,程序将把该英文句子分解为单词,并把每个单词作为一个项目添加到列表框中,如图 2 28所示
4、。该程序不完整,请把它补充完整。 要求:去掉程序中的注释符,把程序中的 “?”改为正确的内容,使其能正确运行,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。 (2)在考生文件夹下有一个工程文件 vbsj4 vbp,请在窗体上画三个文本框,其名称分别为 Txt1、 Txt2和 txtResult,文本框内容分别设置为 “等级考试 ”、 “全国计算机 ”和空白。然后画两个单选按钮,其名称分别为 optChange和 optlrink,标题分别为 “交换 ”和 “连接 ”,如图 2-29所示。编写适当的事件程序,要求在程序运行时,先单击 “交换 ”单选按钮,使 Txt1文本框中内容与
5、 Txt2文本框中内容进行交换,并使 “交换 ”单选按钮消失:然后单击 “连接 ”单选按钮,则把交换后的 Txt1和 Txt2的内容以 Txt1在前, Txt2在后的顺序连接起来,并在 txtRestJlt文本框中显示连接后的内容。存盘时,工程文件名为 vbsj4 vbp,窗体文件名为 vbsj4 frm。注意:不得修改已经给出的程序。在结束程序运行之前,必须先单击 “交换 ”单选按钮,后单击“连接 ”单选按钮。退出程序时必须通过单击窗体右上角的关闭按钮,否则可能无成绩。 三、综合应用题 3 考生文件夹下有工程文件 sjt5 vbp。程序运行时,外观如图 2 187所示,单击“显示数据 ”按钮
6、,则将考生文件夹下 in5 dat文件的内容读入到 5行 40列的:维数组 a中,并按 5行显示在 Text1文本框内;单击 “统计 ”按钮,则计算每行中小于50的数之和,及这些数的平均值 (平均值保留 2位小数,是否四舍五入不限 ),并将它们 (共 10个值 )分别显示在 Labell数组及 Text2数组中。单击 “保存 ”按钮,则保存计算结果。 “显示数据 ”和 “保存 ”按钮的 Click事件过程已经给出,请编写 “统计 ”按钮的 Click事件过程实 现上述功能。 注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须用 “统计 ”进行统计,且必须单击 “保存 ”
7、按钮保存结果,否则无成绩。最后,程序按原文件名存盘。国家二级 VB机试(上机操作)模拟试卷 229答案与解析 一、基本操作题 1 【正确答案】 第 1小题 【操作步骤】 步骤 1:新建一个 “标准 EXE”工程,在窗体 Forml中画三个单选按钮,并设置它的相关属性,其属性及值如表 3 93所示。 步骤 2:按要求将文件保存至考生文件夹中。第 2小题 【操作步骤】 步骤 1:新建一个 “标准 EXE”工程,如表 394在窗体中画出控件并设置其相关属性。 步骤 2:打开代码编辑窗口,编写三个命令按钮的单击事件过程。 参考代码: Private Sub CommandlClick() Imagel
8、 Picture = L0adPicture(App Path ” MiSC34 iCO”) End Sub Private Sub Command2一 Click() Imagel Picture = LoadPicture(App Path ”MiSC37 iCO”) End Sub Private Sub Command3一 Click() Imagel PiCture=LoadPicture() End Sub 步骤 3:按要求将文件保存至考生文件夹中。 二、简单应用题 2 【正确答案】 第 1小题 【操作步骤】 步骤 1:打开考生义件夹下的工程文件vbsj3 vbp。 步骤 2:打开
9、代码编辑窗口,去掉程序中的注释符 “”,将问号 “?”改为正确的内容。 参考代码: S1=txtSentense Text Do While Mid(S1, 11, 1)”And 11 步骤 2:在代码编辑窗口,编写 3个按钮 的单击事件过程。 参考代码: Private Sub optChangeC1ick() Dim temp As String temp=Txt1 Text Txt1 Text=Txt2 Text Txt2 Text=temp optChange ViSible=False End Sub Private Sub optLinkC1ick() txtResult Text=Txt1 Text Txt2 Text End Sub 步骤 3:按要求将文件保存至考生文件夹中。 三、综合应用题 3 【正确答案 】 【操作步骤】 步骤 1:打开考生文件中的奉题工程文件 sit5 vbp,打开代码编辑窗口,在指定位置编写以下代码: 参考代码: For i=1 To 5 Sum=0 Counter=0 For j=1 To 40 If a(i, j)键运行程序,先单击 “显示数据 ”按钮。接着单击 “统计 ”按钮,然后单击 “保存 ”按钮保存结果。
copyright@ 2008-2019 麦多课文库(www.mydoc123.com)网站版权所有
备案/许可证编号:苏ICP备17064731号-1