1、国家二级 VB机试（上机操作）模拟试卷 247及答案与解析 一、基本操作题 1 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。 (1)在名称为 Forml的窗体上画两个命令按钮，其名称分别为 Commandl和 Command2，标题分别为 “扩大 ”和 “移动 ”。如图 2 236所示，编写适当的事件过程。程序运行后，如果单击 “扩大 ”按钮，则使窗体在高、宽方向上各增加 0 2倍 (变为原来的1 2倍 )；如果 “移动 ”命令按钮，则使窗体向右移动 200，向下移动 100。 要求：程序中不得使用变量。 存盘时必须存放在考生文件夹下，工程文件名为sit
2、l vbp，窗体文件名为 sjtl frm。 (2)存名称为 Forml的窗体上画一个标签，其名称为 Labell，标题为 “计算机等级考试 ”， Left属性为0；再画一个水平滚动条，其名称为 HScrolll，在属性窗口中设置其属性如下：编写适当的事件过程。程序运行后，如果移动滚动条上的滚动框，则可使标签向相应的方向移动，标签距窗体左边框的距离等于滚动框的位置，程序的运行情况如图 2 237所示。要求：程序中不得使用变量，每个事件过程中只能写一条语句。 注意：存盼 时必须存放在考生文件夹下，工程文件名为 sjt2 vbp，窗体文件名为 sjt2 frm。 二、简单应用题 2 (1)在名称为
3、 FOrml的窗体上画一个名称为 L1的标签，标题为 “口令 ”；画两个文本框，名称分别为 Text1、 Text2，都没有初始内容；再画三个命令按钮，名称分别为 C1、 C2、 C3，标题分别为 “显示口令 ”、 “隐藏口令 ”、 “复制口令 ”，在开始运行时，向 Text1中输入的所有字符，都显示 “*”，单击 “显示口令 ”按钮后，在 Text1中显示所有字符，再单击 “隐藏口令 ”后。 Text1中的字符不变，但显示的 郜是 “?”，单击 “复制口令 ”后，把 Text1中的实际内容复制到 Text2中，如图 2 13所示。 要求： 在属性窗口中，把窗体的标题改为 “口令窗口 ”。 建
4、立适当的事件过程，完成上述功能。每个过程中只允许写一条语句，且不能使用变量。 存盘时，工程文件名为 sjt3 vbp，窗体文件名为 sit3 frm。 (2)在名称为 Forml的窗体上画一个名称为 P1的图片框，并利用属性窗口把考生目录中的图标文件 Open ico放到图片框中；再画一个通用对话框控件，名称为 CDl，利用属性窗口设置相应属性，即打开对话框时：标 题为 “打开文件 ”，文件类型为 “Word文档 ”，初始目录为 C盘根目录。再编写适当的事件过程，使得在运行时，单击 P1图片框，可以打开上述对话框。运行后的窗体如图 2 14所示。 注意：存盘时必须存放在考生文件夹下，工程文件名
5、为 sjt4 vbp，窗体文件名为 sjt4 frm。程序中不得使用任何变量。 三、综合应用题 3 在考生文件夹下有一个工程文件 sjt5 vbp，窗体上有两个图片框，名称为 P1、P2，分别用来表示信号灯和汽车，如图 2 182所示，其中在 P1中轮流装入 “黄灯 ico”、 “红灯 ico”、 “绿灯 ico”文件来实现信号灯的切换；还有两个计时器Timer1和 Timer2， Timer1用于变换信号灯，黄灯 1秒，红灯 2秒，绿灯 3秒；Timer2用于控制汽车向左移动。运行时，信号灯不断变换，单击 “开车 ”按钮后。汽车开始移动，如果移动到信号灯前或信号灯下，遇到红灯或黄灯，则停止移
6、动，当变为绿灯后再继续移动。在窗体中已经给出了全部控件和程序，但程序不完整，要求阅读程序并去掉程序中的注释符，把程序中的 ?改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分，也不能修改控件的属性。最后把修改后的文件以原文件名存盘。 国家二级 VB机试（上机操作）模拟试卷 247答案与解析 一、基本操作题 1 【正确答案】 第 1小题 【操作步骤】 步骤 1：新建一个 “标准 EXE”工程，如表3-125在窗体中画出控件并设置其相关属性。步骤 2：打开代码编辑窗口，编写两个命令按钮的单击事件过程。 参考代码： Private Sub Commandl Ciick() HeLght=1
7、 2*Me Height Me Width=Width*1 2 End Sub Private Sub Command2一 Click() Left=Lef t+200 Top=Top+100 End Sub 步骤 3：按要求将义件保存下考生文件夹中。 第 2小题 【操作步骤】 步骤 1：新建一个 “标准 EXE”工程，在窗体FormI中加入一个水平滚动条和一个标签，在属性设置窗口中设置其相关属性，其属性及值如表 3 126所示。 步骤 2：双击窗体 FormI上的水平滚动条，打开代码编辑窗口，在 Change事件过程中输入以下代码： 参考代码： Private Sub ttScrolll_C
8、hange() Labell Left=Me HSCr01li End Sub Private Sub ttScrolil一 Scroll() T abell T eft=FOrml ItSCrOlll End Sub 步骤 3：按要求将文件保存至考生文件夹中。 二、简单应用题 2 【正确答案】 第 1小题 【操作步骤】 步骤 1：新建一个 “标准 EXE”工程，如表3-7在窗体中画出控件并设置其相关属性。步骤 2：在代码编辑窗口，分别编写三个按钮的单击事件过程。 参考代码： Private Sub C1 C1ick() Textl PaSSWOrdChar=“” End Sub Privat
9、e Sub C2 C1iCk() Textl PasswordChar=”?” End Sub Private Sub C3 CliCk() C3 Parent Text2 Text=Textl Text End Sub Private Sub FormLoad()、 Textl PasswordChar=” ” End Sub 步骤 3：按要求将文件保存至考生文件夹中。 第 2小题 【操作步骤】步骤 1：新建一个 “标准 EXE”工程，如表 3-8在窗体中画出控件并设置其相关属性。步骤 2：打开代码编辑窗口，编写如下事件过程。 参考代码： PriVate Sub PlCliCk() CDI
10、ShowOpen End Sub 步骤 3：按要求将文件保存至考生文件夹中。 注意：打开 “打开文件 ”对话框还可使用语句： cdlOpen Action=1。 三、综合应用题 3 【正确答案】 【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件 sit5 vbp。 步骤 2：打开代码编辑窗口，去掉程序中的注释符 “”，将问号 “?”改为正确的内容。 参考代码： Timer2 Enabled=True P1 Picture=LoadPicture(”绿灯 ico”) Timer2 Enabled=False P2 Move Forml P2 Left一 10， P2 Top， P2 Width， P2 Height 步骤 3：按要求将文件保存至考生文件夹中。 【考试误区】本题源代码虽然较多，但只要理清原程序代码的流程，解决起来并不难。
