1、国家二级 VB机试(上机操作)模拟试卷 113及答案与解析 一、基本操作题 1 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。 (1)在名称为 Forml、标题为 “列表框练习 ”的窗体上画一个名称为 Listl的列表框,表项内容依次输入 XXX、 ddd、 mmm和 aaa,且以宋体 14号字显示表项内容,如图 3-93 (a)所示。最后设置相应属性,使运行后列表框中的表项按字母升序方式排列,如图 3 93(b)所示。 注意:存盘时,将文件保存至考生文件夹下,且窗体文件名为 sjtl frm,工程文 件名为 sjtl vbp。(2)在名称为 Forml的
2、窗体上,画一个名称为 Labell的标签,其标题为 “计算机等级考试 ”,字体为宋体,字号为 12号,且能根据标题内容自动调整标签的大小。再画两个名称分别为 Commandl、 Command2,标题分别为 “缩小 ”和 “还原 ”的命令按钮(如图 3 94所示 )。 要求:编写适当的事件过程,使得单击 “缩小 ”按钮, Labell中所显示的标题内容自动减小两个字号;单击 “还原 ”按钮, Labell所显示的标题内容的大小自动恢复到 12号。注意:存盘时,将文件保存至考生文件夹下,窗体文件名 为 sjt2 frm,工程文件名为 sjt2 vbp。要求程序中不得使用变量,每个事件过程中只能写
3、一条语句。 二、简单应用题 2 (1)在考生文件夹下有一个工程文件 vbsi3 vbp,相应的窗体文件名为vbsi3 frm。在窗体上有一个命令按钮,其名称为 cmdAdd,标题为 “添加 ”;有一个文本框,名称为 txtSentense,初始内容为空白;有一个列表框,名称为lstWord。程序运行后,在文本框中输入一个英文句子 (由多个单词组成,各单词之间用一个窄格分开 ),然后单击命令按钮,程序将把该英文句子分解为单词, 并把每个单词作为一个项目添加到列表框巾,如图 328所示。该程序不完整,请把它补充完整。要求:去掉程序中的注释符,把程序中的 “?”改为正确的内容,使其能正确运行,但不能
4、修改稃序中的其他部分。最后把修改后的文件按原文件名存盘。程序源码: Private Sub cmdAdd Click() Dim S1 As String, S2 As String DimI1 As Inteqer S1=? I1=1 Do Do While Mid(s1, I 1, 1) ? AndI1 注意:不得修改已经给出的程序。在结束 程序运行之前,必须先单击 “交换 ”单选按钮,后单击 “连接 ”单选按钮。退出程序时必须通过单击窗体右上角的关闭按钮,否则可能无成绩。程序源码: Private Sub Form Unload(Cancel As Integer) Open “out4
5、 txt” For Output As #1 Print #1, Txt1 Text, Txt2 Text, txtResult Text Close#1End Sub 三、综合应用题 3 在考生文件夹中有一个工程文件 sit5 vbp。窗体外观如图 3 134所示。运行程序,单击 “读数据 ”按钮,文件中的数据被读入字符串变量中并显示在 Label2标签中。单击 “排序 ”按钮时,对读入的数据从小到大排序,并将排序结果显示在窗体的Label4控件中。要求:工程文件中已给出部分程序, “读数据 ”命令按钮的事件过程不完整,请去掉程序中的注释符,把程序中的 ?改为正确的内容。请编写 “排序 ”命
6、令按钮的事件过程中的部分程序代码。注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后 ,两个命令按钮的事件过程必须至少各执行一次。 国家二级 VB机试(上机操作)模拟试卷 113答案与解析 一、基本操作题 1 【正确答案】 第 1小题【操作步骤】步骤 1:新建一个 “标准 EXE”工程,如表4 52在窗体中画出控件并设置其相关属性。步骤 2:按要求将文件保存至考生文件夹中。第 2小题【操作步骤】步骤 1:新建一个 “标准 EXE”工程,如表 4 53在窗 c本中画出控件并设置其相关属性。 步骤2:打开代码编辑窗口,编写两个命令按钮的 Click事件过程。参
7、考代码: Private Sub Commandl Click() Labell FontSiZe=Labell FontSiZe一 2End SubPrivate Sub Command2 C1ick() Labell FontSize=12End Sub步骤 3:按要求将文件保存至考生文件夹中。 二、简单应用题 2 【正确答案】 第 1小题【操作步骤】步骤 1:打开考生文件夹下的工程文件vbsj3 vbp。步骤 2:打开代码编辑窗口,去掉程序中的注释符 “,将问号 “?”改为正确的内容。参考代码: S1=txtSentenSe TextDo While Mid(S1, I 1, 1)“”A
8、nd I 1 步骤 2:在代码编辑窗口,编写 3个按钮的单击事件过程。参考代码:步骤 3:按要求将文件保存至考生文件夹中。 三、综合应用题 3 【正确答案】 【操作步骤】 步骤 1:打开考生文件夹中的本题工程文件 sjt5 vbp,在代码编辑窗口,去掉程序中的注释符 “”,将问号 “?”改为正确的内容。 参考代码: Do While Not EOF(1) s= s Str(a(i) 步骤 2:在代码编辑窗口指定位置编写以下代码: 参考代码: num=UBound(a) For i=1 To num一 1 For j =i To num If a(i) a(j) Then t=a(i) a(i)=a(j) a(j)=t End If Next Next 步骤 3:按 键运行程序,先单击 “读数据 ”按钮,再单击 “排序 ”按钮,最后单击窗体右上角的关闭按钮结束程序。 步骤 4:按要求将文件保存至考生文件夹中。
copyright@ 2008-2019 麦多课文库(www.mydoc123.com)网站版权所有
备案/许可证编号:苏ICP备17064731号-1