实验八VB常用控件(二).docVIP

实 验 报 告 学院： 专业： 年级： 姓名： 学号： 实验室号：_______ 计算机号： 实验日期： 年 月 日 指导教师签字： 成绩： 报告退发 (订正 、 重做) 实验八：常用控件（二） 一、实验目的 （1）掌握：计时器和图形控件（图片框、图像框、形状和直线控件）的常用属性、事件和方法 （2）掌握：常用的绘图方法（Line、Circle、Pset） （3）熟悉：焦点与Tab顺序、键盘和鼠标的事件 （4）了解：鼠标的拖动与放下相应的属性、事件和方法 二、实验内容 1 请在标题为“形状”的窗体上设一个如图所示的高、宽均为1500，与窗体的左边距离为1000的形状控件。 注：在属性窗口中完成所有设计。以Sy8-1.frm和Sy8-1.vbp文件名保存在D:\VB程序。 2 请按图设一个大小能自动调整以适应其显示图片的尺寸的图片框（Picture1）以及“显示”和“清空”两个按钮（Command1、Command2）。运行时，单击“显示”，在图片框中显示自选图片；单击“清空”则清空图片框。 注：程序中无需使用任何变量。以Sy8-2.frm和Sy8-2.vbp文件名保存在D:\VB程序。 3设计如图所示的模拟秒表，在窗体体上画三个标签、三个命令按钮、一个计时器、一个列表框、一个文本框。请编写适当的事件过程，使得程序运行时，单击标题为“开始”的命令按钮，计时器开始计时，并在文本框中显示动态的时间变化；单击标题为“记录”的命令按钮，将当前文本框显示的时间添加到列表框， 文本框显示的时间还在变化；单击标题为“停止”的命令按钮，将停止计时，文本框的记录内容不再变化。以Sy8-3.frm和Sy8-3.vbp文件名保存在D:\VB程序。 4设计如图所示的简易画板，在窗体上画一个图片框、一个命令按钮和一组单选按钮。请编写适当的事件过程，使程序运行时，选择相应单选按钮，在图片框上可以实现相应的功能。如选择“画直线”单选按钮，可在图片框上画一条直线；如选择“画矩形”单选按钮，可在图片框上画一矩形；如选择“画圆”单选按钮，可在图片框上画一圆；如选择“画椭圆”单选按钮，可在图片框上画一椭圆；单击标题为“Cls”的命令按钮，则清除图片框的内容。 注：程序中无需使用任何变量以。以Sy8-4frm和Sy8-4.vbp文件名保存在D:\VB程序。 5请按下图设计程序，在窗体上画一个图像框，并在设计时装好图片。请编写适当的事件过程，使程序运行时，可以用鼠标将图像框拖动到窗体内任意的，准确的位置。以Sy8-5.frm和Sy8-5.vbp文件名保存在D:\VB程序。 三、实验环境 （1）硬件：PC机 （2）软件：Windows 操作系统、Visual Basic 6.0 四、实验步骤 1、请在标题为“形状”的窗体上设一个如图所示的高、宽均为1500，与窗体的左边距离为1000的形状控件。 注：在属性窗口中完成所有设计。以Sy8-1.frm和Sy8-1.vbp文件名保存在D:\VB程序。 操作步骤如下： （1）启动Visual Basic，在窗体上画一个形状控件。 （2）窗体、形状控件的属性设置如下： 控件名称 属性 Form1 Caption=“形状” Shape1 Shape1＝3－Circle Fillsyle＝6－Cross （3）各控件布局如下： （4）单击“文件”/“保存工程”菜单项，以Sy8-1.frm和Sy8-1.vbp文件名将窗体和工程文件保存在D:\VB程序内。 2 请按图设一个大小能自动调整以适应其显示图片的尺寸的图片框（Picture1）以及“显示”和“清空”两个按钮（Command1、Command2）。运行时，单击“显示”，在图片框中显示自选图片；单击“清空”则清空图片框。 注：程序中无需使用任何变量。以Sy8-2.frm和Sy8-2.vbp文件名保存在D:\VB程序。 操作步骤如下： （1）启动Visual Basic，在窗体上画两个命令按钮，并将其名称分别改为C1和C2、一个图片框。 （2）各控件属性设置如下： 控件名称 属性 C1 Caption=“显示” C2 Caption=“清空” Picture1 Autosize＝True （3）各控件布局如下： （4）双击窗体，打开代码窗口，输入如下代码： Private Sub Command1_Click()