VB资源包第9章 图形技术.pptxVIP

第9章图形技术

;用户可以使用ScaleMode属性来设置标准坐标系，在设计阶段通过属性窗口进行设置。以窗体为例，其操作方法如下：在对象的属性窗口中找到并单击ScaleMode属性，然后单击右端的下拉三角，打开如图9.2所示的属性窗口，进行其他度量单位的选择。;VisualBasic提供了8个度量单位，除属性值0外，其他7种单位用来设定绘图时所使用的度量单位，如果不设定，则绘图时以缇为单位，使用默认坐标系，如属性值为2、3、4、5、6、7之一，则使用的是标准坐标系。ScaleMode属性值不同，则坐标系的度量单位不同，具体含义如表9.1所示。;9.1.3自定义坐标系

默认坐标系和标准坐标系都以容器的左上角为坐标原点，坐标值沿水平向右或者垂直向下增加。有时，可能不希望以左上角为坐标原点，或者希望坐标值沿水平向左或垂直向上时增加等，为了达到最大的编程灵活性，VisualBasic中用户可以根据编程需要定义自己的坐标系。VisualBasic提供了两种自定义坐标系的方法，一种是使用Scale方法，另一种是设置ScaleTop、ScaleLeft、ScaleWidth、ScaleHeight属性的值的方法。;例如，设置窗体坐标系的原点（0,0）为窗体的中心，并实现坐标值向右、向上增加，向左、向下减少，可使用如下语句：

Scale(-100,100)-（100，-100）;2.使用属性设置的方法自定义坐标系

通过设置ScaleTop、ScaleLeft、ScaleWidth、ScaleHeight属性的值的方法设置坐标系。

语法格式：

[对象名.]ScaleLeft=x

[对象名.]ScaleTop=y

[对象名.]ScaleWidth=宽度

[对象名.]ScaleHeight=高度;9.2图形的属性

1.CurrentX、CurrentY属性

CurrentX、CurrentY属性给出在容器内绘图时的当前横坐标、纵坐标，这两个属性只能在程序中设置。

格式为：

[对象名.]CurrentX[=x]

[对象名.]CurrentY[=y]

功能：设置对象的CurrentX和CurrentY的值。;2.DrawWidth（线宽）属性

窗体、图片框或打印机的DrawWidth属性给出这些对象上所画线的宽度或点的大小。

格式为：

[对象名.]DrawWidth[=n]

功能：设置容器输出的线宽。

说明：n为数值表达式，其范围为1~32767，该值以像素为单位表示线宽。默认值为1，即1个像素宽。;3.DrawStyle(线型)属性

窗体、图片框或打印机的DrawStyle属性给出这些对象上所画线的形状，见表9.2所示。

表9.2DrawStyle属性值的含义;【例9.2】利用DrawWidth属性在窗体上随机产生10条不同长度、宽度，不同颜色的直线。

代码如下：

PrivateSubCommand1_Click()

DimiAsInteger

Fori=1To10

X1=Int(Rnd*Form2.Width)

Y1=Int(Rnd*Form2.Height)

X2=Int(Rnd*Form2.Width)

Y2=Int(Rnd*Form2.Height)

Form2.DrawWidth=Int(Rnd*10)+1

Line(X1,Y1)-(X2,Y2),QBColor(Int(Rnd*16))

Nexti

EndSub

;4.AutoRedraw属性

AutoRedraw属性用于设置和返回对象或控件是否能自动重绘。

若AutoRedraw属性值为True时，使Form对象或PictureBox控件的自动重绘有效，否则会不接收重绘事件（Paint）。

5.FillStyle和FillColor属性

封闭图形的填充方式由FillStyle和FillColor属性决定。

FillColor属性指定填充图案的颜色，默认的颜色ForeColor相同。FillStyle属性指定填充的图案，共有8种内部图案，具体含义见表9.3所示。;6.色彩

VB默认采用前景色（ForeColor）绘图，也可以通过以下函数设置颜色。

（1）RGB函数

RGB函数通过红、绿、蓝3基色混合产生某种颜色，其格式为：

RGB(red,green,blue)

说明：red、green、blue代表红、绿、蓝3色成分，取值范围为0~255之间的整数。例如RGB(0,0,0)返回黑色，RGB(255,255,255)返回白色。;（2）QBColor函数

QBColor函数返回一个用来表示所对应颜色值的RGB颜色码。

格式为：

QBColor(Color)

说明：C