1、国家二级 VB机试（上机操作）模拟试卷 14及答案与解析 一、基本操作题 1 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。在名称为Forml的窗体上画两个命令按钮，其名称分别为 Commandl和 Command2，标题分别为 ”扩大 ”和 ”移动 ”。如图 2-91所示，编写适当的事件过程。程序运行后，如果单击 ”扩大 ”按钮，则使窗体在高、宽方向上各增加 0 2倍 (变为原来的 1 2倍 )；如果 ”移动 ”命令按钮，则使窗体向右移动 200，向下移动 100。要求：程序中不得使用变量。 存盘时必须存放 在考生文件夹下，工程文件名为 sjtl vbp
2、，窗体文件名为 sjtl frm。 2 在名称为 Forml的窗体上画一个标签，其名称为 Labell，标题为 ”计算机等级考试 ”， Left属性为 0；再画一个水平滚动条，其名称为 HScrolll，在属性窗口中设置其属性如下： 编写适当的事件过程。程序运行后，如果移动滚动条上的滚动框，则可使标签向相应的方向移动，标签距窗体左边框的距离等于滚动框的位置，程序的运行情况如图 2-92所示。要求：程序中不得使用变量，每个事件过程中只能写一条语句。注意：存盘时必须存放在考生文件夹 下，工程文件名为 sjt2 vbp，窗体文件名为 sjt2 frm。 二、简单应用题 3 在名称为 Forml的窗体
3、上画一个计时器，其名称为 Timerl；再画一个图像框，其名称为 Imagel，在该图像框中装入一个图形文件 pic ico；然后画一个水平滚动条，其名称为 HScrolll， Min属性值为 100， Max属性值为 1200， LargeChange属性值为 100， SmallChange属性值为 25，编写适当的事件过程。程序运行后，可以使图像框闪烁，其闪烁速度可以通过滚动条调节。 要求：图像框的闪烁可以 通过图像框交替地显示和隐藏来实现。程序中不得使用变量，每个事件过程中只能写一条语句。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt3 vbp，窗体文件名为sjt3 frm
4、。 4 在考生目录下有一个工程文件 sjt4 vbp，包含了所有控件和部分程序，如图 2-93所示。要求如下： 利用属性窗口设置适当的属性：为 Listl列表框添加三个项目：宋体、黑体、楷体 _GB23 12； Textl文本框设置初始值为 ”计算机 ”； Hscroll 1水平滚动条设置最小值和最大值分别为 10、 50。 去掉程序中的注释符，把 程序中的 ?改为正确的内容，完成以下功能：如果在列表框中选择一种字体，然后移动滚动条中的滚动框，则可使文本框中的文字按所选择的字体显示，并可随着滚动框的移动放大或缩小：如果不选择字体直接移动滚动框，则显示一个信息框，提示 ”请选择字体 ”。注意：去
5、掉程序中的注释符，把程序中的 ?改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。 三、综合应用题 5 在考生文件夹下有一个工程文件 sjt5 vbp，已给出了部分控件和部分程序。程序运行时，请在窗体上画三个标签，其名称分 别为 Labell、 Label2和 Label3，标题分别 为 ”姓名 ”、 ”电话号码 ”和 ”邮政编码 ”。再画三个文本框，其名称分别为 Textl、Text2和 Text3，初始内容均为空白，如图 2-94所示。程序运行后，如果单击 ”显示第三个记录 ”按钮，则读取考生文件夹下 in5 txt文件中的第三个记录，将该记录
6、的三个字段分别显示在三个文本框中 (该文件是一个用随机存取方式建立的文件，共有 5个记录 )。单击 ”保存 ”按钮，则把该记录 (三个字段 )保存到考生文件夹下的顺序文件 out5 txt中。请编写 ”显示第三个记录 ”按钮的 Click事件过程，以实现上述功能。注意：考生不得修改已经存在 的程序，必须用 ”保存 ”按钮存储结果，否则无成绩。最后，按原文件名把程序存盘。 国家二级 VB机试（上机操作）模拟试卷 14答案与解析 一、基本操作题 1 【正确答案】 步骤 1：新建一个 ”标准 EXE”工程，如表 3-48在窗体中画出控件并设置其相关属性。 步骤 2：打开代码编辑窗口，编写两个命令按钮
7、的单击事件过程。参考代码： PriVate Sub Commandl_Click( )Height=1 2*Me HeightMe Width=Width *1 2End SubPrivate Sub Command2_Click( )Left=Left+200Top=Top+100End Sub步骤 3：按要求将文件保存至考生文件夹中。 2 【正确答案】 步骤 1：新建一个 ”标准 EXE”工程，在窗体： Forml中加入一个水平滚动条和一个标签，在属性设置窗口中设置其相关属性，其属性及值如表 3-49所示。 步骤 2：双击窗体 Forml上的水平滚动条，打开代码编辑窗口，在 Change事
8、件过程中输入以下代码：参考代码： Private Sub HScrolll_Change( )Labell Left=Me HScrolllEnd SubPrivate Sub HScrolll_Scroll( )Labell Left=Forml HScrolllEnd Sub步骤 3：按要求将文件保存至考生文件夹中。 二、简单应用题 3 【正确答案】 步骤 1：新建一个 ”标准 EXE”工程，如表 3-50在窗体中画出控件并设置其相关属性。步骤 2：打开代码编辑窗口，分别编写计时器的 Timer事件过程和滚动条的 Change事件过程。参考代码： Private Sub HScrolll_
9、Change( )Timer1 Interval=HScrolll ValueEnd SubPrivate Sub Timerl_Timer( )Imagel Visible=Not Imagel VisibleEnd Sub 步骤 3：按要求将文件保存至考生文件夹中。 4 【正确答案】 步骤 1：打开考生文件中的本题工程文件 sjt4 vbp，如表 3 51设置控件的相关属性。 步骤 2：打开代码编辑窗口，在代码编辑窗口，去掉程序中的注释符 ”“，将问号 ”?”改为正确的内容。参考代码： Text1 FontSize=HScrolll ValueText1 FontName=List1 Te
10、xt步骤 3：按要求将文件保存至考生文件夹中。 三、综合应用题 5 【正确答案】 步骤 1：打开考生文件中的本题工程文件 sjt5 vbp，如表 3 52在窗体中画出控件并设置其相关属性。 步骤 2：在代码编辑窗口中，编写 Commandl_Click事件过程。参考代码： Private Sub Commandl_Click( )Dim Pal As PaltypeOpen App Path&” in5 txt”For RandomAs #1 Len=Len(Pal)Get #1， 3，PalText1 Text=Pal NameText2 Text=Pal TelText3 Text=Str(Pal Post)Close 1End Sub步骤 3：按要求将文件保存至考生文件夹中。步骤 4：按 F5键键运行程序，先单击 ”显示第三个记录 ”按钮，再单击 ”保存 ”按钮。
