第12章圖形操作.ppt.ppt

第12章 图形操作 12.1 VB坐标系统 在VB中，每个对象定位于存放它的容器，例如，窗体处于屏幕内，屏幕是窗体的容器，在窗体内绘制控件，窗体就是控件的容器。每个容器都有一个坐标系，它里面的每一个点可用一对坐标（X，Y）表示，但采用的坐标系统不同，同一绘图区域的坐标刻度范围以及同一位置的坐标刻度X,Y也不一样。VB提供两类坐标系：默认坐标系、自定义坐标系。 12.1.1 默认坐标系 VB中，每个对象容器（屏幕、窗体、图片框、框架等）都有一个默认坐标系，其特点是：原点（0，0）定位在对象容器用户区的左上角，X轴向右、Y轴向下为正方向。下图是窗体作为控件的容器时的默认坐标系： 12.1.1 默认坐标系 默认坐标系中，属性ScaleTop和ScaleLeft用于控制容器对象左边和顶端的坐标，根据这两个属性值可形成坐标系原点。所有对象的ScaleTop、ScaleLeft属性的默认值均为0。 属性Height和Width确定容器对象高度和宽度。 属性ScaleHeight和ScaleWidth确定对象内部水平方向和垂直方向的单元数。 属性ScaleMode决定对象坐标度量单位，共有8种单位，ScaleMode属性默认为twip ，ScaleMode属性设置如下表所示。 12.1.2 自定义坐标系 在图形操作中可通过下面方法定制窗体、图片框等对象的坐标系，包括改变坐标原点的位置、改变X轴及Y轴的正向、改变坐标单位等。 1．修改属性值 当容器对象的ScaleMode属性设置为0时，允许自定义坐标系统。此时程序设汁者可通过设置对象的四个属性ScaleWidth、ScaleHeight、ScaleLeft、ScaleTop来定义合适的坐标系。对象左上角坐标为（ScaleTop,ScaleLeft），右下角坐标为（ScaleLeft+ScaleWidth，ScaleTop+ScaleHeight）。 例如，设置窗体Form1的四项属性为： Form1.ScaleLeft = -200 Form1.ScaleTop = 250 Form1.ScaleWidth = 500 Form1.ScaleHeight = -400 12.1.2 自定义坐标系 2．Scale方法 Scale方法可重新定义窗体、图片框、打印机等对象的坐标系。语法格式为： [对象名.] Scale [(X1, Y1) – (X2, Y2)] 其中：对象名可以是窗体、图片框或打印机。如果缺省对象名，默认为带有焦点的窗体对象。（X1，Y1）是对象用户区左上角的新坐标，（X2，Y2）是对象用户区右下角的新坐标。缺省时恢复默认坐标系。 执行了Scale方法后，VB根据给定的坐标参数自动计算出新的ScaleLeft、ScaleTop、ScaleWidth、ScaleHeight属性值： ScaleLeft = X1 ScaleTop = Y1 ScaleWidth = X2 – X1 ScaleHeight = Y2 – Y1 所以，通过设置（X1，Y1）、（X2，Y2）可改变坐标单位。 12.2 图形控件 图形控件包括直线控件（Line ）和形状控件（Shape ），它们是VB提供的两种标准控件，利用它们可在窗体、图片框、框架等绘图对象上快速直接地绘制各种简单的线条及形状。定制控件MSChart可在窗体上绘制图表，支持真正的三维显示。本节简单介绍这三个控件的使用。 12.2.1 Line控件 Line控件用于在窗体、图片框和框架中直接画直线或斜线，直线的长短、位置、颜色、形状等由其属性决定。直线的主要属性如下表所示： 直线的属性既可以在设计时通过属性窗口来设置，也可以在程序运行的时候动态的改变直线的各种属性。例如在运行时修改直线的宽度： Line.BorderWidth=3 12.2.2 Shape控件 Shape控件可在绘图对象上绘制矩形、正方形、椭圆、圆、圆角矩形以及圆角正方形等几何图形。在设计阶段将该控件加到窗体、图片框或框架中后，即显示为一个几何图形，图形的形状、颜色、形态等由其属性决定，Shape控件的几个主要属性如下表所示： 12.2.2 Shape控件 例12.2 用Shape控件的Shape属性显示Shape控件的6种形状，并填充不同的图案，如图所示： 采用Shape控件数组，程序如下： Private Sub Form_Activate() Dim i As Integer Shape1(0).S