常用的绘图方法

vb神童教程第三章第四节——常用的绘图方法

文章来源：赛迪 作者：小雷

除了前面谈到的用控件显示与绘制图形的方法外，VB 还提供了一组庞大的方法用来绘制点、线、面，以及设置前景、背景色等各种方法。

一、设置当前绘图点：

在 VB 中，可以通过设置窗体或图形框的 CurrentX 与 CurrentY 属性来设置当前绘图点。CurrentX 与 CurrentY 决定了绘制或显示的起始坐标，在设计时，这两个属性不可用。

二、绘制点、线、面的方法：

1、点的绘制法：

在指定对象（如窗体、图形框）上的指定位置处绘制点，还可以为点指定颜色，语法如下：

对象名.Pset (X,Y)，[Color]

X ，Y 分别为点的水平与垂直坐标，Color 为点的颜色，是可选项。

2、直线的绘制法：

在对象上绘制直线，语法如下：

对象名.Line (X1,y1) - (X2,Y2), [Color]

(X1,Y1) 是直线的起点，(X2,Y2)是直线的终点，Color 为可选项。

如图一：

图一

2、图形框的代码是：

Private Sub Picture1_Click()

Picture1.Line (350, 1020)-(2050, 1020)

End Sub

3、绘制矩形：

用 Line 方法还可以绘制矩形，语法如下：

对象名.Line (X1,Y1) - (X2,Y2), [Color], B ,[F]

其中，(X1,Y1) 是矩形的左上角座标，(X2,Y2)是矩形右下角座标，Color 为矩形边框的颜色，使用参数 B 而不用 F ，那么矩形用当前的填充色（FillColor）与填充方式（FillStyle）对矩形进行填充；如果使用了参数 F ，那么矩形以边框的颜色进行填充。如图二：

图二

特别注意，用 Line 画矩形框，如果不用其他参数，那么 B 与坐标(X2,Y2)之间应该有两个逗点，一个是紧跟坐标2，一个表示 Color 省略了，如：Picture1.Line (500,500) - (1000,1000),,B

4、绘制圆、椭圆、弧：

用 Circle 方法可以绘制圆、椭圆与弧，语法如下：

对象名.Circle (X,Y), Radius, [Color,start,end,aspect]

其中，(X,Y)是圆、椭圆或弧的圆心坐标，Radius 是半径，这两个参数是必须项；Color 是圆的轮廓色，Start 与 End 是弧的起点与终点位置。其范围是 -2 —— 2Pi ；Aspect 是圆的纵横尺寸比，默认值是 1即圆，如图三：

图三

三、颜色、前景与背景色的设置：

1、颜色函数 RGB()

在前面关于卷动条控件（综合示例五）的讲解中，我们讲述了色彩的设置问题，而这正是 RGB 颜色函数的原理所在。色彩设置的方法如下：RGB(Red,Green,Blue)

不要忘了，Red、Green、Blue 每种色彩各有 0——255 种成份，三种色彩不同参数的搭配，就产生了丰富多采的现实世界。

2、前景色的设置：

通过对 ForeColor（前景色属性）的设置，可以返回或设置对象的前景色。

3、背景色的设置：

对 BackColor 属性进行设置，就可以返回或设置对象的背景色。

4、图形的清除：

用 Cls 方法可以清除窗体或图形框在程序运行中绘制的图形，语法如下：

对象名.Cls