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

时间:2009-07-09 02:40:31   来源:第二电脑网  作者:第二电脑网

  第二电脑网导读:rrentX 与 CurrentY 属性来设置当前绘图点。CurrentX 与 CurrentY 决定了绘制或显示的起始坐标,在设计时,这两个属性不可用。 二、绘制点、线、面的方法: 1、点的绘制法: 在指定对象(如窗体、图形框)上的指定位置处绘制点,还可以为点指定颜色,语法如下: 对象名.Pset (X,Y),[Color] X ...
  正文:

除了前面谈到的用控件显示与绘制图形的方法外,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


来源:http://www.002pc.com/master/College/Language/VB/9955.html

收藏到:

关于《V神童教程第三章第四节——常用的绘图方法》文章的评论

共有 0 位网友发表了评论 此处只显示部分留言 点击查看完整评论页面

随机文章

    SQL Error: select * from ***_ecms_article where classid='91' and checked=1 order by rand() limit 10

顶出来的热门

    SQL Error: select * from ***_ecms_article where classid='91' and checked=1 order by diggtop desc,id desc limit 10
站内搜索: 高级搜索

热门搜索: Windows style 系统 tr IP QQ CPU 安装 function 注册 if td