项目五图形控件与绘图操作ppt课件

1、工程五工程五 图形控件与绘图操作图形控件与绘图操作工程五 图形控件与绘图操作v学习目的：学习目的：v掌握绘图操作必需的图形根底知识及坐标系掌握绘图操作必需的图形根底知识及坐标系统的作用和定义。统的作用和定义。v掌握常用图形控件掌握常用图形控件PictureBoxPictureBox、ImageImage、LineLine、ShapeShape的运用方法、控件的常用属性的运用方法、控件的常用属性和事件。和事件。v掌握图形操作的常用方法掌握图形操作的常用方法PSetPSet、LineLine、CircleCircle与技巧。与技巧。活动一活动一 认识认识VBVB坐标系统坐标系统一、一、VBVB坐标

2、系统坐标系统VBVB坐标系统是一个二维坐标系统，是由坐标原点、坐标度量单坐标系统是一个二维坐标系统，是由坐标原点、坐标度量单位、坐标位、坐标X X轴和坐标轴和坐标Y Y轴组成。轴组成。在在VBVB中，有两种坐标系统：一种是中，有两种坐标系统：一种是VBVB提供的规范坐标系统，另提供的规范坐标系统，另一种是用户自定义坐标系统。一种是用户自定义坐标系统。1 1、规范坐标系统、规范坐标系统在规范坐标系统中，均以容器的左上角为该坐标系统的坐标原在规范坐标系统中，均以容器的左上角为该坐标系统的坐标原点点0 0，0 0，坐标轴的默许单位都是缇。，坐标轴的默许单位都是缇。ScaleModeScaleMode

3、属性属性每个容器都有一个坐标系，坐标度量单位由容器对象的每个容器都有一个坐标系，坐标度量单位由容器对象的ScaleModeScaleMode属性决议，属性决议，ScaleModeScaleMode属性设置如表属性设置如表1 1所示。所示。表表1 ScaleMode1 ScaleMode属性设置属性设置属性值属性值 单单 位位 说说 明明0 0 用户定义用户定义 User User1 1 缇缇 Twip Twip缺省值缺省值2 2 磅磅 Point Point3 3 像素像素 Pixel Pixel4 4 字符字符 Charecter Charecter缺省为高缺省为高1212磅，宽磅，宽202

4、0磅磅5 5 英寸英寸 Inch Inch6 6 毫米毫米 Millimeter Millimeter7 7 厘米厘米 Centimeter Centimetery(0,0)x20001500自定义坐标自定义坐标(0,0)yx(-1000,750)(1000,-750)一、一、VBVB坐标系统坐标系统v2 2、自定义坐标系统、自定义坐标系统v在在VBVB的窗体对象中也可以运用自定义的坐标的窗体对象中也可以运用自定义的坐标系统。在自定义坐标系统中，可以恣意规定系统。在自定义坐标系统中，可以恣意规定坐标轴的方向，运用恣意的长度单位。坐标轴的方向，运用恣意的长度单位。v对于窗体来说，对于窗体来说，L

5、eftLeft、TopTop、WidthWidth和和HeightHeight属性的单位永远是缇。其中属性的单位永远是缇。其中LeftLeft、TopTop分别是分别是窗体的外边框到屏幕左边、上边的间隔；窗体的外边框到屏幕左边、上边的间隔；WidthWidth和和HeightHeight分别是包括窗体的边框和标题分别是包括窗体的边框和标题栏在内的宽度和高度。栏在内的宽度和高度。一、一、VBVB坐标系统坐标系统v方法方法1 1：经过：经过ScaleScale方法设置坐标系统。方法设置坐标系统。v格式：格式： 对象对象.Scale(x1,y1)-(x2,y2).Scale(x1,y1)-(x2,y

6、2)v阐明：阐明：v1 1对象可以是窗体、图片框或打印机。对象可以是窗体、图片框或打印机。v2 2参数参数(x1,y1)(x1,y1)和和(x2,y2)(x2,y2)分别指定对象的左上角和右下分别指定对象的左上角和右下角的新坐标。角的新坐标。v例：例：Form1.Scale(100,100)-(500,500)Form1.Scale(100,100)-(500,500)v表示窗体表示窗体Form1Form1的坐标系统为：左上角坐标的坐标系统为：左上角坐标(100,100)(100,100)，右下，右下角坐标角坐标(500,500)(500,500)。vScaleWidth=x2-x1Scale

7、Width=x2-x1vScaleHeight=y2-y1ScaleHeight=y2-y1v执行无参数的执行无参数的ScaleScale方法，那么会取消用户自定义坐标系统。方法，那么会取消用户自定义坐标系统。恢复为规范坐标系统以缇为单位，以恢复为规范坐标系统以缇为单位，以(0,0)(0,0)点为原点。点为原点。v【ScaleWidth】，【】，【ScaleHeight】属性】属性v功能：设置或前往功能：设置或前往X轴长度和轴长度和Y轴长度。轴长度。v阐明：【阐明：【ScaleWidth】，【】，【ScaleHeight】属性可以设为负】属性可以设为负值，但此时的负值并不表示值，但此时的负值并

8、不表示X轴的长度、轴的长度、Y轴的长度为负值，轴的长度为负值，而是用来规定而是用来规定X轴、轴、Y轴的正方向。假设【轴的正方向。假设【ScaleWidth】属】属性为负，那么表示性为负，那么表示X轴的正方向为向左；假设轴的正方向为向左；假设【ScaleHeight】属性为负值，那么表示】属性为负值，那么表示Y轴的正方向为向轴的正方向为向上。上。一、一、VBVB坐标系统坐标系统v方法方法2 2：经过对象的：经过对象的ScaleLeftScaleLeft、ScaleTopScaleTop、ScaleWidthScaleWidth、ScaleHeightScaleHeight属性来实现。属性来实现。

9、v规范坐标系统中，规范坐标系统中，ScaleLeftScaleLeft和和ScaleTopScaleTop属性总是属性总是0 0；ScaleWidthScaleWidth和和ScaleHeightScaleHeight属性那么是根据坐标系统的长度单位计算的对象内属性那么是根据坐标系统的长度单位计算的对象内部区域的实践宽度和高度。部区域的实践宽度和高度。v当改动当改动ScaleTopScaleTop或或ScaleLeftScaleLeft的值后，坐标系的的值后，坐标系的X X轴或轴或Y Y轴按此值平轴按此值平移构成新的坐标原点。右下角坐标值为移构成新的坐标原点。右下角坐标值为(ScaleLeft

10、+ScaleWidth,ScaleTop+ScaleHeight)(ScaleLeft+ScaleWidth,ScaleTop+ScaleHeight)。X X轴与轴与Y Y轴的轴的度量单位为分别为度量单位为分别为1 1ScaleWidthScaleWidth和和1 1ScaleHeightScaleHeight。v例：例：Scale(x1,y1)-(x2,y2)Scale(x1,y1)-(x2,y2)v等同于设置以下四个属性：等同于设置以下四个属性：vScaleLeft=x1ScaleLeft=x1ScaleTop=y1ScaleTop=y1vScaleWidth=x2-x1ScaleWid

11、th=x2-x1 ScaleHeight=y2-y1ScaleHeight=y2-y1一、一、VBVB坐标系统坐标系统v【例1】在窗体的单击事件中，用属性定义图片框的坐标系。v【例2】在窗体中单击命令按钮，用Scale方法定义图片框的坐标系。二、直线控件二、直线控件Linev直线控件直线控件(Line)(Line)用来在窗体和其他容器控件中创建简单的线用来在窗体和其他容器控件中创建简单的线段，它没有本人的特殊方法，也不产生任何事件。设计和运段，它没有本人的特殊方法，也不产生任何事件。设计和运转时可以经过它的属性来改动它的位置、粗细和颜色等。转时可以经过它的属性来改动它的位置、粗细和颜色等。v1

12、. 1. 常用属性常用属性v(1)BorderColor(1)BorderColor属性：设置直线的颜色。属性：设置直线的颜色。v(2)BorderWidth(2)BorderWidth属性：设置直线的粗细。属性：设置直线的粗细。v(3)BorderStyle(3)BorderStyle属性：设置直线款式。属性：设置直线款式。0 06 6种类型种类型,1,1实实线线,6,6内实线。内实线。v2. 2. 特有属性特有属性vx1,x2,y1,y2x1,x2,y1,y2属性：指定起点和终点的属性：指定起点和终点的x x坐标及坐标及y y坐标。可以坐标。可以经过改动经过改动x1,x2,y1,y2x1,

13、x2,y1,y2的值的值, ,来改动线的位置和长度。来改动线的位置和长度。 v阐明：阐明：v直线控件没有直线控件没有LeftLeft、TopTop、WidthWidth和和HeightHeight属性，运转时也不属性，运转时也不能用能用MoveMove方法决议直线的位置和长短。方法决议直线的位置和长短。三、三、Pset方法方法v格式格式: :对象名对象名. .PSet(x,y)PSet(x,y), ,颜色颜色v功能功能: :在窗体或图片框上画出一个点。对象缺省时在窗体或图片框上画出一个点。对象缺省时, ,为窗体。为窗体。v阐明阐明: :v(1)(x,y)(1)(x,y)为要画点的坐标。为要画点

14、的坐标。v(2)(2)颜色颜色: :是指要画点的颜色。缺省时是指要画点的颜色。缺省时,PSet,PSet用用“前风光画点前风光画点, ,如想删除一个点，那么用如想删除一个点，那么用“背风光画点。背风光画点。v例如例如: :vPicture1.PSet(1500,1000),RGB(255,0,0) Picture1.PSet(1500,1000),RGB(255,0,0) v在图片框在图片框Picture1Picture1中中(1500,1000)(1500,1000)处画一个红色的点。处画一个红色的点。四、四、AutoRedraw属性属性vAutoRedraw属性是窗体和图片框的属性。属性是

15、窗体和图片框的属性。v当运用当运用Line、Circle、Pset、Point、Print等方法创建的图等方法创建的图形和文字在屏幕中暂消逝，窗体复原后，这些图形或文字无形和文字在屏幕中暂消逝，窗体复原后，这些图形或文字无法自动恢复。当设置法自动恢复。当设置AutoRedraw属性值为属性值为True后，那么可后，那么可以自动恢复，否那么要由以自动恢复，否那么要由Paint事件过程完成。事件过程完成。活动一实例活动一实例例：在图片框上随机画例：在图片框上随机画100个闪烁的彩色圆点。个闪烁的彩色圆点。活动二 图形控件的运用v图形控件有直线控件(Line)、外形控件(Shape)、图像框(Ima

16、ge)、图片框(PictureBox)，本节分别引见其程序设计方法。一、外形控件v运用外形控件(Shape)可在窗体或其他控件容器中画出矩形、正方形、圆、椭圆、圆角矩形或圆角正方形。外形控件的Shape属性决议了它的图形款式，这个属性的一切能够取值都有对应的外形款式。1.1.外形控件的常用属性外形控件的常用属性v(1)Left(1)Left、TopTop、WidthWidth和和HeightHeight属性决议外形控件的位置和属性决议外形控件的位置和大小，也可以用大小，也可以用MoveMove方法改动它的大小和位置。方法改动它的大小和位置。v(2)BorderWidth(2)BorderWid

17、th属性设置图形边境宽度。它的值是以像素为属性设置图形边境宽度。它的值是以像素为单位的边线宽度。单位的边线宽度。v(3)BorderColor(3)BorderColor属性设置图形边境颜色。属性设置图形边境颜色。v(4)BorderStyle(4)BorderStyle属性设置边境限的类型。属性设置边境限的类型。v(5)FillColor(5)FillColor属性设置图形的前景颜色。属性设置图形的前景颜色。v假设要为图形填充颜色假设要为图形填充颜色( (背景背景) )时时, ,首先应该将属性首先应该将属性FillStyle(FillStyle(填充方式填充方式) )设置成设置成1(1(透明

18、透明),),否那么否那么FillColor(FillColor(前前风光风光) )的颜色会遮盖了背风光的颜色会遮盖了背风光, ,达不到预期的目的。达不到预期的目的。v例如例如, ,将图形的将图形的FillStyleFillStyle属性的值设为属性的值设为0(0(实心实心, ,不透不透明明),FillColor(),FillColor(填充颜色填充颜色) )为蓝色为蓝色, ,此时此时, ,不论不论BackColorBackColor为何为何种颜色种颜色, ,都被蓝色所遮盖都被蓝色所遮盖, ,假设将假设将FillStyleFillStyle改为改为1(1(透明透明),),那那么图形内显示背风光。

19、么图形内显示背风光。2.2.外形控件的特有属性外形控件的特有属性v(1)Shape(1)Shape属性属性v该属性用来设置图形的外形。该属性用来设置图形的外形。v 0Rectangle 0Rectangle 矩形矩形v 1Square 1Square 正方形正方形v 2Oval 2Oval 椭圆形椭圆形v 3Circle 3Circle 圆形圆形v 4Rounded Rectangle 4Rounded Rectangle 圆角矩形圆角矩形v 5Rounded Square 5Rounded Square 圆角正方形圆角正方形vShapeShape属性的缺省值为属性的缺省值为0(0(矩形矩形)

20、 )。假设选择。假设选择3,3,那么用那么用ShapeShape控控件画出的矩形中画出一个圆件画出的矩形中画出一个圆( (圆的直径是矩形的短边圆的直径是矩形的短边) )。v(2)BackStyle(2)BackStyle属性属性v该属性用来设置图形背景的风格该属性用来设置图形背景的风格v 0Transparent( 0Transparent(透明透明) )v 1Opaque( 1Opaque(不透明不透明) )v缺省值为缺省值为0 0。假设着色。假设着色, ,显然要将显然要将BackStyleBackStyle属性设置为属性设置为“不透不透明。明。v(3)FillStyle(3)FillSty

21、le属性属性v该属性用来设置图形填充的线形该属性用来设置图形填充的线形( (风格或款式风格或款式) )。v【例【例1 1】用】用ShapeShape属性显示外形控件的属性显示外形控件的6 6种外形。种外形。v【例【例2 2】将外形控件显示不同的外形、设置不同的颜色，填】将外形控件显示不同的外形、设置不同的颜色，填充不同的图案。充不同的图案。2.2.外形控件的特有属性外形控件的特有属性二、图片框二、图片框v图片框图片框(PictureBox)(PictureBox)控件的主要作用是为用户显示图片，也控件的主要作用是为用户显示图片，也可作为其他控件的容器。实践显示的图片是由可作为其他控件的容器。实

22、践显示的图片是由PicturePicture属性属性决议的。决议的。v1.1.特有属性特有属性v(1)Picture(1)Picture属性属性vPicturePicture属性用于窗体、图片框和图像框。它可经过属性窗属性用于窗体、图片框和图像框。它可经过属性窗口进展设置，也可在程序中进展设置，即使用口进展设置，也可在程序中进展设置，即使用LoadPicture()LoadPicture()函数，装入图片文件。在窗体、图片框和图像框中显示的图函数，装入图片文件。在窗体、图片框和图像框中显示的图形以文件方式存放在磁盘上，形以文件方式存放在磁盘上，VB6.0VB6.0支持以下格式的图形文支持以下格

23、式的图形文件。件。v位图文件位图文件(Bitmap)(Bitmap)v图标文件图标文件(Icon)(Icon)v图元文件图元文件(Metafile)(Metafile)v紧缩位图文件紧缩位图文件(JPEG)(JPEG)v紧缩位图文件紧缩位图文件(GIF)(GIF)二、图片框二、图片框v(2)AutoSize(2)AutoSize属性属性v图片框控件不能伸缩图像使图像顺应它的大小。假设把图片图片框控件不能伸缩图像使图像顺应它的大小。假设把图片框控件的框控件的AutoSizeAutoSize属性设置为属性设置为TrueTrue，那么图片框控件就会自，那么图片框控件就会自动调整本身的大小以包容整个图

24、像。动调整本身的大小以包容整个图像。v2.2.图片框控件的特点图片框控件的特点v图片框控件的最大特点是，它的表现更像一个窗体对象，它图片框控件的最大特点是，它的表现更像一个窗体对象，它具有许多与窗体对象类似的属性和方法。窗体的一切显示文具有许多与窗体对象类似的属性和方法。窗体的一切显示文本和图像的方法、作图方法以及与之相关的属性在图片框控本和图像的方法、作图方法以及与之相关的属性在图片框控件中都有同名的方法和属性。图片框控件有本人的坐标系统，件中都有同名的方法和属性。图片框控件有本人的坐标系统，也可以重新定义坐标系统。也可以重新定义坐标系统。二、图片框二、图片框3.3.图形文件的装入图形文件的

25、装入图形文件的装入有两种方法：一种是在设计阶段装入，另一种图形文件的装入有两种方法：一种是在设计阶段装入，另一种是在运转期间装入。是在运转期间装入。1 1在设计阶段装入图形文件在设计阶段装入图形文件在设计阶段装入图形文件用两种方法：在设计阶段装入图形文件用两种方法：(1)(1)用属性窗口中的用属性窗口中的PicturePicture属性装入属性装入(2)(2)利用剪切板装入利用剪切板装入2 2在运转期间装入图形文件在运转期间装入图形文件PicturePicture属性可以设置被显示的图片文件名属性可以设置被显示的图片文件名( (包括可选途径名包括可选途径名) )。在程序运转时，可以运用在程序运

26、转时，可以运用LoadPicture()LoadPicture()函数，在图片框中函数，在图片框中装入图形。装入图形。二、图片框二、图片框vLoadPicture()LoadPicture()函数函数v格式：对象格式：对象.Picture=LoadPicture(.Picture=LoadPicture(图形文件名图形文件名)v功能：在对象中装入一个图形。功能：在对象中装入一个图形。v阐明：阐明：v(1)(1)对象可以是图片框或图像框，也可以是窗体，假设是窗对象可以是图片框或图像框，也可以是窗体，假设是窗体，对象名可以省略。体，对象名可以省略。v(2)(2)假设删除一个图形，可以运用假设删除一

27、个图形，可以运用LoadPicture()LoadPicture()函数，将一函数，将一个空白图形装入对象的个空白图形装入对象的PicturePicture属性。属性。v格式：对象格式：对象.Picture=LoadPicture().Picture=LoadPicture()v例：在图片框装入图形：例：在图片框装入图形：Picture1.Picture=LoadPicture(Picture1.Picture=LoadPicture(“d:a1.jpgd:a1.jpg) )v删除图形：删除图形： Picture1.Picture=LoadPicture() Picture1.Picture=

28、LoadPicture()二、图片框二、图片框v装入图片框中的图形，可以拷贝到另一个图片框中。假设在装入图片框中的图形，可以拷贝到另一个图片框中。假设在窗体中已建立了两个图片框：窗体中已建立了两个图片框：Picture1Picture1与与Picture2Picture2，那么用：，那么用：v Picture1.Picture=LoadPicture(CPicture1.Picture=LoadPicture(C：GraphicsGraphicsIconsIconsArrowsArrowsarw06up.ico) arw06up.ico) Picture2.Picture=Picture1.P

29、icturePicture2.Picture=Picture1.Picturev可以把图片框可以把图片框Picture1Picture1中的图形拷贝到图片框中的图形拷贝到图片框Picture2Picture2中。中。v4.4.常用事件常用事件v图像框可以呼应图像框可以呼应ClickClick和和DblClickDblClick事件。事件。v5.5.常用方法常用方法v在图片框中运用在图片框中运用ClsCls方法和方法和PrintPrint方法。方法。【例】在窗体上交换两个图片框中的图形。【例】在窗体上交换两个图片框中的图形。二、图片框二、图片框vPaintPicture方法方法v格式：对象格式：

30、对象.PaintPicture Source,x1,y1,Width1,Height1,x2,y2,Width2,Height2,OpCodev阐明：为图片框控件提供一个具有编辑功能的命令，运用该阐明：为图片框控件提供一个具有编辑功能的命令，运用该方法可以对位图进展程度或垂直翻转，以及对图形进展拉伸、方法可以对位图进展程度或垂直翻转，以及对图形进展拉伸、紧缩等操作。紧缩等操作。vsource：被放置的源图像，必需在窗体或图片框的：被放置的源图像，必需在窗体或图片框的Picture属性中设置。属性中设置。vX1,y1：图像左上角在目的对象中的位置。经过改动：图像左上角在目的对象中的位置。经过改动

31、x1,y1的的值来实现图片的挪动。值来实现图片的挪动。vWidth1,Height：图像在目的对象中的位置。经过改动目的：图像在目的对象中的位置。经过改动目的图片的宽度和高度来实现图片的拉伸和缩放。将图片的宽度和高度来实现图片的拉伸和缩放。将width1，height1参数的值设为负值，可以将图片翻转。参数的值设为负值，可以将图片翻转。vX2,y2：源对象中开场复制图像的位置，缺省时为：源对象中开场复制图像的位置，缺省时为0，即从源，即从源对象的左上角开场复制图像。对象的左上角开场复制图像。vWidth2,Height：要复制的区域的宽度和高度，缺省时为整：要复制的区域的宽度和高度，缺省时为整

32、个图像。个图像。二、图片框二、图片框【例】设计图片编辑器，能实现对图片进展简单的程度翻转、垂直翻转、放大、减少等操作。二、图片框二、图片框v例：编程实现三个图片框中图片的轮换，并使得一个图片框例：编程实现三个图片框中图片的轮换，并使得一个图片框中可以显示整个图片。中可以显示整个图片。v1界面设计界面设计v在窗体上添加如图在窗体上添加如图1所示三个图片框控件所示三个图片框控件Picture1、Picture2、Picture3。将。将Picture3的的AutoSize属性设置为属性设置为True。其他属性值为默许值。其他属性值为默许值。a设计时界面设计时界面 b运转时界面运转时界面 c呼应事件

33、呼应事件图图1 图片框图片框二、图片框二、图片框v2编写事件代码编写事件代码v在在Form_Load()事件中参与如下代码：事件中参与如下代码：vPrivate Sub Form_Load()v Picture1.Picture = LoadPicture(c:steamship.gif) v Picture2.Picture = LoadPicture(c:bus.gif)v Picture3.Picture = LoadPicture(c:car.gif)vEnd Subv在在Picture3_Click()事件中参与如下代码：事件中参与如下代码：vPrivate Sub Picture3

34、_Click()v Form1.Picture = Picture3.Picture Picture3.Picture = Picture2.Picturev Picture2.Picture = Picture1.Picture Picture1.Picture = Form1.Picturev Form1.Picture = LoadPicture()vEnd Sub三、图像框三、图像框1.1.常用属性常用属性(1)Picture(1)Picture属性属性该属性的功能与图片框的一样。该属性的功能与图片框的一样。在图像框控件装入图片文件的方法和运用图片的文件格式也与在图像框控件装入图片文件

35、的方法和运用图片的文件格式也与图片框一样。图片框一样。(2)Stretch(2)Stretch属性该属性用来自动调整图像框中图形内容的大小，属性该属性用来自动调整图像框中图形内容的大小，既可经过属性窗口设置，也可以经过程序代码设置。该属性既可经过属性窗口设置，也可以经过程序代码设置。该属性值为值为TrueTrue或或FalseFalse。其属性值为其属性值为FalseFalse时，图像框可以自动改动大小以顺应其中的时，图像框可以自动改动大小以顺应其中的图形。图形。其属性值为其属性值为TrueTrue时，加载到图像框中的图形，可以自动调整尺时，加载到图像框中的图形，可以自动调整尺寸以顺应图像框的

36、大小。寸以顺应图像框的大小。三、图像框三、图像框2.2.常用事件常用事件图像框可以呼应图像框可以呼应ClickClick和和DblClickDblClick事件。事件。3.3.图片框与图像框的区别图片框与图像框的区别1 1图片框是容器控件，可以作为父控件，而图像框不能作图片框是容器控件，可以作为父控件，而图像框不能作为父控件。为父控件。2 2图片框可以经过图片框可以经过PrintPrint方法接纳文本，而图像框不能接纳方法接纳文本，而图像框不能接纳用用PrintPrint方法输入的信息，也不能用绘图方法在图像框上绘方法输入的信息，也不能用绘图方法在图像框上绘制图形。制图形。3 3图像框比图片框

37、占用内存少，显示速度快。图像框比图片框占用内存少，显示速度快。【例】编写程序，模拟交通讯号灯的切换。【例】编写程序，模拟交通讯号灯的切换。活动二实例活动三 图形方法v图形方法有Pset、Line、Circle，本节经过运用作图方法，进展画点、画直线、画矩形、画圆、画椭圆、画圆弧等。一、一、LineLine方法方法v格式格式: :对象对象. .Line (x1,y1)-(x2,y2)Line (x1,y1)-(x2,y2), ,颜色，颜色，B BF Fv功能功能: :在窗体或图片框上画出一条直线或一个矩形。在窗体或图片框上画出一条直线或一个矩形。对象缺省时对象缺省时, ,为窗体。为窗体。v阐明阐

38、明: :v(1)x1,y1(1)x1,y1：画线起始点的坐标，缺省时从对象的当前：画线起始点的坐标，缺省时从对象的当前位置开场画。位置开场画。v(2)x2,y2(2)x2,y2：画线终了点的坐标。：画线终了点的坐标。v(3)(3)颜色：线条的颜色，缺省时运用对象的前风光。颜色：线条的颜色，缺省时运用对象的前风光。v(4)(4)假设没有参数假设没有参数B B，那么是画一条直线。，那么是画一条直线。v(5)(5)假设有参数假设有参数B B，画一个矩形，指定参数，画一个矩形，指定参数F F，表示要，表示要画的是一个实心的矩形。画的是一个实心的矩形。(x1,y1)(x1,y1)与与(x2,y2)(x2

39、,y2)是所画矩是所画矩形的左上角和右下角的坐标。形的左上角和右下角的坐标。Line(500,300)-(3000,2500),RGB(255，0，0)在在(500,300)与与(3000,2500)之间绘制一条红色直线。之间绘制一条红色直线。颜色函数颜色函数v1.RGB1.RGB颜色函数颜色函数vRGBRGB是一个颜色函数是一个颜色函数, ,“R R代表代表Red(Red(红红),),“G G代表代表Green(Green(绿绿),),“B B代表代表Blue(Blue(蓝蓝),),经过红、绿、蓝三经过红、绿、蓝三种根本性混合产生某种颜色。种根本性混合产生某种颜色。v格式：格式：RGB(RG

40、B(红，绿，蓝红，绿，蓝) )阐明：阐明：v(1)(1)红、绿、蓝三种根本性运用红、绿、蓝三种根本性运用0 0255255之间的整数。之间的整数。v(2)(2)从实际上来说，三种根本性混合可产生从实际上来说，三种根本性混合可产生256256256256256256种颜色，但是实践运用时遭到显示硬种颜色，但是实践运用时遭到显示硬件的限制，普通显示卡只能显示件的限制，普通显示卡只能显示1616种颜色。种颜色。例如：vRGB(0,0,0)RGB(0,0,0)前往黑色。前往黑色。vRGB(255,0,0)RGB(255,0,0)前往红色。前往红色。vRGB(255,0,255)RGB(255,0,25

41、5)的含义是无绿色的成分的含义是无绿色的成分, ,红和红和蓝成分相等蓝成分相等, ,效果为紫红色。效果为紫红色。v这这3 3个参数的不同值组合个参数的不同值组合, ,可以产生许许多多可以产生许许多多种颜色种颜色, ,表表2 2列出了一些颜色的组合。列出了一些颜色的组合。表2 RGB颜色函数vRGBRGB函数函数 颜颜 色色vRGB(0,0,0) RGB(0,0,0) 黑色黑色vRGB(255,0,0) RGB(255,0,0) 红色红色vRGB(0,255,0) RGB(0,255,0) 绿色绿色vRGB(0,0,255) RGB(0,0,255) 蓝色蓝色vRGB(0,255,255) RG

42、B(0,255,255) 青蓝色青蓝色vRGB(255,0,255) RGB(255,0,255) 紫红色紫红色vRGB(255,255,0) RGB(255,255,0) 黄色黄色vRGB(255,255,255) RGB(255,255,255) 白色白色2.QBColor2.QBColor函数函数vQBColorQBColor函数采用函数采用QuickBasicQuickBasic所运用的所运用的1616种颜色。种颜色。v格式：格式：QBColor(QBColor(颜色码颜色码) )v阐明：阐明：v(1)(1)颜色码运用颜色码运用0 01515之间的整数，每个颜色码代之间的整数，每个颜色

43、码代表一种颜色。表一种颜色。v(2)RGB(2)RGB函数与函数与QBColorQBColor函数实践上都前往一个函数实践上都前往一个6 6位位的的1616进制的长整数，这个数从左到右，每两位一进制的长整数，这个数从左到右，每两位一组代表一种基色，他们的顺序是蓝绿红。因此，组代表一种基色，他们的顺序是蓝绿红。因此，也可以直接用也可以直接用6 6位的位的1616进制颜色代码表示。在颜色进制颜色代码表示。在颜色的属性框中，可以看这些代码。表的属性框中，可以看这些代码。表3 3列出了列出了QBColorQBColor颜色函数。颜色函数。QBColor(2)QBColor(2)代表绿代表绿色色,QBC

44、olor(4),QBColor(4)代表红色。代表红色。表3 QBColor颜色函数颜色值颜色值 颜色颜色 颜色值颜色值 颜色颜色 0 0 黑色黑色 8 8 灰色灰色 1 1 蓝色蓝色 9 9 亮蓝色亮蓝色 2 2 绿色绿色 10 10 亮绿色亮绿色 3 3 青色青色 11 11 亮青色亮青色 4 4 红色红色 12 12 亮红色亮红色 5 5 粉红色粉红色 13 13 亮粉红色亮粉红色 6 6 黄色黄色 14 14 亮黄色亮黄色 7 7 白色白色 15 15 亮白色亮白色例如:vLine(500,300)-(3000,2500),QBColor(12)Line(500,300)-(3000,

45、2500),QBColor(12)v在在(500,300)(500,300)与与(3000,2500)(3000,2500)之间绘制一条亮红色直线。之间绘制一条亮红色直线。vLine (3000,5000)Line (3000,5000)v从当前位置开场到从当前位置开场到(3000,5000)(3000,5000)画一条直线。画一条直线。vLine(500,300)-(3000,2500),QBColor(4),BFLine(500,300)-(3000,2500),QBColor(4),BFv此时画出一个内部填充红色的实心矩形。此时画出一个内部填充红色的实心矩形。二、二、CircleCirc

46、le方法方法v1.1.用用CircleCircle方法画圆方法画圆v格式格式: :对象名对象名. .Circle(x,y),Circle(x,y),半径半径, ,颜色颜色v功能功能: :在窗体或图片框上画圆。在窗体或图片框上画圆。v阐明阐明:x,y:x,y：为圆心的坐标位置。：为圆心的坐标位置。v例如例如: :v Circle(2000,1000),500 Circle(2000,1000),500v Picture1.Circle(1000,400),500,QBColor(12) Picture1.Circle(1000,400),500,QBColor(12)2.2.用用CircleCi

47、rcle方法画椭圆方法画椭圆v格式格式: :对象名对象名. .Circle(x,y),Circle(x,y),半径半径, ,颜色颜色,纵横比纵横比v功能功能: :在窗体或图片框上画椭圆。在窗体或图片框上画椭圆。v阐明阐明: :纵横比是椭圆垂直半径与程度半径的比率。小于或大于纵横比是椭圆垂直半径与程度半径的比率。小于或大于1 1画椭圆，画椭圆，1 1画圆。画圆。v例如例如: :vCircle(2000,1000),500,2Circle(2000,1000),500,2vPicture1.Circle(1000,400),500,QBColor(12),0.5Picture1.Circle(10

48、00,400),500,QBColor(12),0.5vPicture1.Circle(1000,400),500,QBColor(12),1Picture1.Circle(1000,400),500,QBColor(12),13.3.用用CircleCircle方法画圆弧及扇形方法画圆弧及扇形v格式格式: :对象名对象名. .Circle(x,y),Circle(x,y),半径半径, ,颜色颜色, ,起始角起始角, ,终止角终止角v功能功能: :在窗体或图片框上画圆弧及扇形。在窗体或图片框上画圆弧及扇形。v阐明阐明: :v(1)(1)起始角与终止角起始角与终止角: :为所画圆或椭圆的起始角度

49、与终止角度为所画圆或椭圆的起始角度与终止角度, ,单位为弧度单位为弧度, ,取值为取值为-2-222，缺省时，缺省时, ,起始角为起始角为0,0,终止角为终止角为22。弧度增大方向是逆时针方向。弧度增大方向是逆时针方向。v(2)(2)起始角、终止角均为正时起始角、终止角均为正时, ,那么只画圆弧那么只画圆弧; ;假设两者之一为假设两者之一为负值时负值时, ,不仅画圆弧不仅画圆弧, ,而且还会从圆心到负值的点画一条直线。而且还会从圆心到负值的点画一条直线。角度换算成弧度的公式为：弧度角度换算成弧度的公式为：弧度=角度角度 * 3.14/180活动三实例绘图属性绘图属性1 1、当前坐标、当前坐标C

50、urrentXCurrentX和和CurrentYCurrentY属性：给出对象在绘图时的属性：给出对象在绘图时的当前坐标。当前坐标。阐明：对象是指窗体、图形框或打印机。阐明：对象是指窗体、图形框或打印机。当重新设置窗体的坐标系统时，当重新设置窗体的坐标系统时，CurrentXCurrentX和和CurrentYCurrentY的值也将的值也将自动改动，但这两个数为坐标的点的实践位置并不改动。自动改动，但这两个数为坐标的点的实践位置并不改动。【例】运用【例】运用CurrentXCurrentX和和CurrentYCurrentY属性，在窗体上输出如下图的属性，在窗体上输出如下图的立体字效果。立

51、体字效果。绘图属性绘图属性v2 2、线宽、线宽v(1)DrawWidth(1)DrawWidth属性属性v该属性用于设置运用窗体或图片框对象的作图方法画线时以该属性用于设置运用窗体或图片框对象的作图方法画线时以像素为单位的线宽，其取值范围在像素为单位的线宽，其取值范围在132 767132 767之间。当之间。当DrawWidthDrawWidth属性的值较大时，画出的线就有一定的宽度。属性的值较大时，画出的线就有一定的宽度。v(2)BorderWidth(2)BorderWidth属性属性v该属性用于运用控件时定义线的宽度。该属性用于运用控件时定义线的宽度。v【例】在窗体上画一系列宽度递增的

52、直线。【例】在窗体上画一系列宽度递增的直线。绘图属性绘图属性v3 3、线型款式、线型款式v(1)DrawStyle(1)DrawStyle属性属性v该属性决议作图方法画线时的线型款式。该属性决议作图方法画线时的线型款式。v 0 0实线实线( (缺省缺省) )v 1 1虚线虚线v 2 2点线点线v 3 3点划线点划线v 4 4双点划线双点划线v 5 5透明线透明线( (无线无线) )v 6 6内实线内实线v阐明：当阐明：当DrawWidthDrawWidth属性值大于属性值大于1 1并且并且DrawStyleDrawStyle属性值为属性值为1 14 4时，都能产生实线效果。时，都能产生实线效果。绘图属性绘图属性v(2)BorderStyle(2)BorderStyle属性属性v该属性用于运用控件时给出画线的款式。该属性用于运用控件时给出画线的款式。v 0 0透明线透明线v 1 1实线实线( (缺省缺省) )v 2 2长划线长划线v 3 3点线点线v 4 4点划线点划线v 5 5点点划线点点划线v 6 6内实线内实线绘图属性绘图属性v4 4、填充、填充v封锁图形的填充方式是由封锁图形的填充方式是由FillColorFillColor属性与属性与FillStyleFillStyle属性决属性决议的。议的。v(1)