VB课件--第8讲 图形操作.docVIP

第8讲 图形操作 8.1 图形操作基础 在VB中绘制图形，其操作过程一般分为4个步骤： ① 先定义图形载体窗体或图形框对象的坐标系。 ② 设置线宽，线型、色彩等属性。 ③ 指定画笔的起终点位置。 ④ 调用绘图方法绘制图形。 8.1.1 坐标系统 构成一个坐标系，需要三个要素：坐标原点、坐标度量单位、坐标轴的长度与方向。坐标度量单位由容器对象的ScaleMode属性决定。缺省时为Twip。每英寸1440个Twip，20个Twip为一磅。 用户自定义坐标系 使用Scale方法，语法如下： 对象.Scale[(xLeft ， yTop)-(xRight，yBottom)] 8.2 绘图属性 8.2.1 当前坐标 CurrentX，CurrentY属性给出窗体或图形框或打印机在绘图时的当前坐标。 这两个属性在设计阶段不能使用，使用CLS方法后，CurrentX、CurrentY属性值为0 8.2.2 线宽与线型 窗体、图形框或打印机的DrawWidth属性给出这些对象上所画线的宽度或点的大小(以像素为单位，最小值为1)。 仅当DrawWidth为1 时才能产生线型。 8.2.3 填充与色彩 FillColor 指定封闭图形的填充颜色 FillStyle 指定填充的图案(有8种内部图案) RGB(红,绿,蓝)产生某种颜色，三基色使用0～255之间的整数；QBColor(颜色码) 0～15之间的整数 8.3 图形方法 8.3.1 Line方法 画直线或矩形：[对象.] Line [(x1,y1)]-(x2,y2)[,颜色][,B[F]] (x1，y1)为线段的起点坐标或矩形的左上角坐标 (x2，y2)为线段的终点坐标或矩形的右下角坐标 B表示画矩形；F表示填充矩形 8.3.2 Circle方法 Circle方法用于画圆、椭圆、圆弧和扇形： [对象.]Circle [Step] (x,y),半径[,[颜色][,[起始角][,[终止角][,长短轴比率]]]] 圆弧和扇形通过参数起始角、终止角控制。当起始角、终止角取值在0～2π时为圆弧；当在起始角、终止角取值前加一负号时，画出扇形，负号表示画圆心到圆弧的径向线。 椭圆通过长短轴比率控制，默认值为1时，画圆。 Private Sub Form_Click() Scale (15,15)-(-15,-15) Circle (0, 0), 7 Circle (0,0),10, , , ,2 Circle (0, 0), 10, -5, 0.5, 2 Circle (0, 0), 9, -1, -4 End Sub 8.3.3 Pset方法 Pset方法用于画点： [对象.] Pset (x,y) [,颜色] 8.3.4 Point方法 返回指定点的RGB颜色：[对象.] Point (x,y) (x,y)指定点的坐标。如果(x,y)点位于对象之外，Point 方法将返回True。 综合应用 用Point方法获取一个区域的信息并使用Pset方法进行仿真。 本章小结 在VB内绘制图形过程 先定义图形载体的坐标系 设置绘图属性(线宽，线型、色彩等) 指定画笔的起终点位置 调用绘图方法绘制图形 坐标系定义 Scale 绘图方法 Line、Circle、Pset 、Point 2 ScaleHeight Height (100,-100) (-100,100)