答案: 除了前面谈到的用控件显示与绘制图形的方法外,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
上一个:VB 神童教程第四章第一节——菜单界面设计
下一个:VB 神童教程第三章第三节——直线与形状控件