2013年计算机二级VB上机模拟试题及答案（3）

　　1. 基本操作(2小题，每小题15分，共计30分)

　　注意：下面出现的“考生文件夹”均为%USER%

　　**********************************************************************

　　请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。

　　(1)在名称为Form1的窗体上画一个名称为Frame1，标题为“目的地”的框架，在框架中添加三个复选框，名称分别为Check1、Check2、Check3，其标题分别是“上海”、“广州”、“巴黎”，其中“上海”为选中状态，“广州”为未选状态，“巴黎”为灰色状态，如图所示。请画控件并设置相应属性。

　　注意：

　　存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。

　　解题思路：

　　启动Visual Basic系统，创建一个Form1窗体。

　　在该窗体上画一个框架控件，通过其属性窗口将名称设为Frame1，标题(Caption属性)设为“目的地”。

　　在F1框架中画三个复选框控件，通过其属性窗口将名称分别设为Check1、Check2、Check3，标题(Caption属性)

　　分别设为“上海”、“广州”、“巴黎”，“上海”的Value属性设为1,“巴黎”的Value属性设为2。

　　参考文件：c:\wexam\26990001\hlpsys\参考答案\sjt1.vbp、sjt1.frm、sjt1.vbw请把这些文件复制到c:\wexam\26990001中，然后打开sjt1.vbp文件并运行。

　　**********************************************************************

　　(2)在名称为Form1的窗体上画一个名称为Picture1的图片框， 其宽和高分别为1700、1900。请编写适当事件过程，使得在运行时，单击图片框，则装入考生目录下的图形文件pic1.bmp，如图所示。单击窗体则图片框中的图形消失。要求程序中不得使用变量，每个事件过程中只能写一条语句。

　　注意：

　　存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。

　　解题思路：

　　启动Visual Basic系统，创建一个Form1窗体。

　　在该窗体上画一个图片框，通过其属性窗口将名称设为Picture1，宽度(Width属性)设为1700，高度(Height属性)设为1900。

　　单击图片框(即运行Click事件过程)，在Click事件过程中加入语句：Picture1.Picture =LoadPicture("pic1.bmp")，即将考生目录下的图形文件pic1.bmp装入图片框中。单击窗体(即运行Click事件过程)，在Click事件过程中加入语句：Picture1.Picture = LoadPicture("")，即图片框中的图形消失。