2016职教Visual Basic程序设计教案：第七章 图形操作.doc

第七章 图形操作 图形可以为应用程序的界面增加趣味，提供可视结构。在管理信息系统中，经常需要通过直方图、圆饼图、折线图等图形来表现系统处理的数据结果，以直观的方式为用户提供管理和决策方面的信息。Visual Basic 具有丰富的图形功能，不仅可以通过图形控件进行创建图形和绘图的操作，还可以通过图形的方法在窗体或图形框上输出文字和图形。VB提供的图形控件除了我们已经介绍的Picture Box、Image、Shape之外，最主要的有MSChart控件，MSChart控件是本章重点介绍的内容。MSChart控件支持真正三维的图形表示，支持所有主要的图表类型，我们可以利用VB的MSChart控件绘制各种经济分析图表。 【教学目标】 MSChart控件的作用及设置方法。 2．了解对象的坐标系统的设置方法。 3. 坐标属性的含义及定义。 4. 用图形的属性和方法绘制简单的图形。 5. MSChart控件的工作原理。 6．利用MSChart控件制作各种统计图表的步骤。 技能点： 1．VB中常用绘图属性的设置和方法的使用。 2. 通过使用MSChart控件的相关属性定义统计图表的类型、数据源、标题、字体、标注、显示格式等 。 3. 利用数据库中的数据绘制各种统计图表。 §7.1 图形操作基础 【】【】【】 【】 一、坐标系统 1、坐标 在VB中，每个对象定位于存放它的容器内，对象定位都要使用容器的坐标系。例如，窗体处于屏幕内，屏幕就是窗体的容器。对于窗体内的控件，窗体就是控件的容器。每个容器都有坐标系，构成坐标系有三个要素：坐标原点，坐标度量单位，坐标轴的长度与方向。坐标原点位于容量的左上角，横向为X轴，纵向为Y轴。容器中坐标系如下图所示： 图：7.1 2、坐标度量单位 坐标的度量单位由容器对象的ScaleMode属性决定，该属性的设置如表所示： 属性设置 单 位 0 User（用户定义） 1 Twip（缺省值，1/20磅） 2 Point（磅，每英寸72磅） 3 Pixed（像素） 4 字符（缺省高12磅，宽20磅） 5 inch（英寸） 6 millimeter（毫米） 7 centimeter（厘米） 二、Line方法 Line方法用于画直线或矩形。 1、格式 [对象.]Line [[Step]（x1，y1）—（x2，y2）[，颜色[，B[F]] 2、说明： （1）“对象”表示Line在何处画直线或矩形，若缺省为当前窗体； （2）（x1，y1）为画线的起点坐标；（x2，y2）为终点坐标； （3）Step表示采用当前作图位置的相对值； （4）关键字B表示画矩形； （5）关键字F表示用颜色填充矩形。 三、自定义坐标 对象的坐标系允许用户自行定义。VB提供两种方法来进行坐标系的定义。 方法一、通过对象的ScaleTop、ScaleLeft、ScaleWidth、ScaleHeight属性来实现。其中ScaleTop和ScaleLeft的值用于定义对象左上角的坐标。当改变了ScaleTop和ScaleLeft的值后，对象坐标系的X轴和Y轴按改变后的值平移，形成新的坐标原点。坐标平移后，对象的右下角坐标值为（ScaleLeft＋ScaleWidth，ScaleTop＋ScaleHeight）。 例：在命令按钮Command1的Click事件过程中，通过坐标系ScaleTop、ScaleLeft、ScaleWidth、ScaleHeight属性来重新定义窗体的坐标系，令窗体中画出我们熟悉的坐标原点在窗体左下角的坐标系。Command1的Click事件过程如下： Private Sub Command1_Click() Cls ‘窗体左上角的原坐标值不变 Form1.ScaleLeft = 0 Form1.ScaleTop = 0 ‘窗体右下角的坐标为（500，400） Form1.ScaleWidth = 500 Form1.ScaleHeight = 400 Line (20, 380)-(480, 380) ‘画一条长度为480－20的平行线表示X轴 Line (20, 380)-(20, 20) ‘画一条长度为380－20的垂直线表示Y轴 End Sub 程序运行后会在窗体中画出如下表示坐标轴的图形：