vb第10章 图形操作(2014下)

1、 在在VB中一般把中一般把或或作为绘制图形的作为绘制图形的载体。绘制图形一般分为载体。绘制图形一般分为4个步骤：个步骤： 先定义图形载体窗体或图片框坐标系。先定义图形载体窗体或图片框坐标系。 设置线宽，线型、色彩等属性。设置线宽，线型、色彩等属性。 指定画笔的起止点位置。指定画笔的起止点位置。 调用绘图方法绘制图形。调用绘图方法绘制图形。1. 默认坐标系默认坐标系 在VB中，每个容器对象都有一个坐标系，用于定义容器中对象的位置。 VB坐标系的缺省坐标原点（0,0）在容器对象的左上角， 水平方向的x坐标轴向右为正方向， 垂直方向的y坐标轴向下为正方向， 缺省度量单位为“缇”（Twip）。1cm

2、= 567twip (0,0)(0,0) 例如：例如： Form1.ScaleMode=7 CurrentX属性：设置或返回容器对象的当前水平坐标。属性：设置或返回容器对象的当前水平坐标。 CurrentY属性：设置或返回容器对象的当前垂直坐标。属性：设置或返回容器对象的当前垂直坐标。 例如在图片框例如在图片框Picture1中，使用以下语句可以在中，使用以下语句可以在 指定的指定的 当前坐标位置输出当前坐标位置输出欢迎使用欢迎使用Visual Basic 6.0 。 Picture1.CurrentX = 1000 Picture1.CurrentY = 2000 Picture1.Prin

3、t 欢迎使用Visual Basic 6.0 VB中的颜色可以使用多种方式来设置。中的颜色可以使用多种方式来设置。BackColor : 设置对象的背景色设置对象的背景色ForeColor ：设置对象的前景色：设置对象的前景色（1）使用）使用RGB函数。返回一个长整型的颜色值。函数。返回一个长整型的颜色值。 RGB(Red,Green,Blue) Red：红色取值，范围为：红色取值，范围为0255 Green：绿色取值，范围为：绿色取值，范围为0255 Blue：蓝色取值，范围为：蓝色取值，范围为0255例如，将窗体的背景色设置为红色，可以写成：例如，将窗体的背景色设置为红色，可以写成： Fo

4、rm1.BackColor = RGB(255, 0, 0)（2）使用）使用QBColor函数。返回一个长整型颜色值。函数。返回一个长整型颜色值。QBColor（value）例如，例如，Form1.BackColor = QBColor(4)（3）使用颜色常量。）使用颜色常量。VB将经常使用的颜色值定义将经常使用的颜色值定义为系统内部常量。为系统内部常量。例如，将窗体的背景色设置为红色，可以写成：例如，将窗体的背景色设置为红色，可以写成： Form1.BackColor=vbRed（4）使用颜色的十六进制表示值。用户可以直接）使用颜色的十六进制表示值。用户可以直接使用该十六进制数为颜色属性赋值

5、。该十六进制数使用该十六进制数为颜色属性赋值。该十六进制数表示为：表示为： & H 0 0 B B G G R R & 长 整 型 符 号 蓝 、 绿 、 红 三 原 色 保 留 表 示 十 六 进 制 例如，将窗体的背景色设置为红色，可以写成：例如，将窗体的背景色设置为红色，可以写成： Form1.BackColor = &H000000FF& 使用容器对象的使用容器对象的PSet、Line和和Circle方法，可以在容方法，可以在容器中绘制各种图形。器中绘制各种图形。10.4.1 PSet方法方法在容器对象的指定在容器对象的指定位置位置用特定的用特定的颜色颜

6、色画点。画点。 对象名对象名.PSet Step (x,y) ,颜色颜色 【说明说明】Step规定了（规定了（x，y）的值相对于原点）的值相对于原点(省略）还省略）还是相对于是相对于(CurrentX,CurrentY),省略表示相对于原点。省略表示相对于原点。综合三种鼠标事件绘图。要求按下鼠标左键时启综合三种鼠标事件绘图。要求按下鼠标左键时启动绘图；若同时按下动绘图；若同时按下Shift键，开始擦图。鼠标移动时按相键，开始擦图。鼠标移动时按相应轨迹绘图或擦图，应轨迹绘图或擦图，所谓擦图是以窗体的背景色画图所谓擦图是以窗体的背景色画图。释。释放鼠标键时整个过程结束。放鼠标键时整个过程结束。10

7、.4.2 Line方法方法 Line方法用于画直线和矩形。方法用于画直线和矩形。对象名对象名.Line Step (x1,y1)Step (x2,y2) ,颜色颜色,BF 【说明说明】 Step:可选项，当在可选项，当在(x1,y1)前出现时，前出现时， (x1,y1)表示相对于当表示相对于当前坐标位置的坐标；当在前坐标位置的坐标；当在(x2,y2)前出现时表示，前出现时表示， (x2,y2)表示相对于图表示相对于图形起点的终点坐标形起点的终点坐标B、F： B表示画矩形；表示画矩形；F表示填充矩形表示填充矩形执行执行Line方法后，当前坐标被设置在终点坐标方法后，当前坐标被设置在终点坐标(x2

8、,y2)。线的宽度取。线的宽度取决于容器对象的决于容器对象的DrawWidth属性值。属性值。 10.4.3 Circle方法方法 Circle方法用于在容器对象上画圆形、椭圆形、方法用于在容器对象上画圆形、椭圆形、圆弧和扇形圆弧和扇形对象名对象名.Circle Step(x,y),半径半径,颜色颜色,起始角起始角,终止角终止角,纵横比纵横比在窗体上按下鼠标时，以光标所在处为圆心画等距同心在窗体上按下鼠标时，以光标所在处为圆心画等距同心圆圆1Cls方法方法清除图形或字符，格式：清除图形或字符，格式： 对象名对象名.Cls2线宽（线宽（DrawWidth）属性）属性（DrawWidth属性用于设置在该对象上用图形方法属性用于设置在该对象上用图形方法输出的图形的线宽。该属性值以像素为单位表示，输出的图形的线宽。该属性值以像素为单位表示，取值范围从取值范围从1到到32767，缺省值为，缺省值为1。3自动重画（自动重画（AutoRedraw）属性）属性 AutoRedraw属性提供了重新显示窗体和图