Presentation is loading. Please wait.

Presentation is loading. Please wait.

Visual Basic 第11章 图形与图象设计

Similar presentations


Presentation on theme: "Visual Basic 第11章 图形与图象设计"— Presentation transcript:

1 Visual Basic 第11章 图形与图象设计

2 主要内容 图形控件: 绘图方法: 显示图片控件 容器: 坐标系: 自定义坐标系 颜色及颜色函数 vbRed 等符号常量 Shape 形状
Line 直线 绘图方法: PSet Line Circle 显示图片控件 PictureBox 图片框 Image 图像框 容器: 窗体和图片框 坐标系: 坐标轴 度量单位 自定义坐标系 颜色及颜色函数 QBColor(n) RGB(r,g,b) vbRed 等符号常量

3 Shape-形状控件的主要属性 Shape属性:决定6种形状之一 FillStyle属性:决定填充的图案
BorderStyle属性:决定边界线的虚实 FillColor:填充色,BorderColor:边框色 BorderWidth:边框宽度。如宽度>1,则边界只能是实线。

4 Line(直线)控件的主要属性 X1,Y1 - 起点坐标 X2,Y2 - 终点坐标 BorderWidth - 线条宽度
BorderStyle - 线条虚实样式 如BorderWidth >1,则BorderStyle不起作用, 只能是实线。 BorderColor - 线条颜色 注意:在运行时想改变直线的位置,应改变其端点的坐标。Line 没有 Left 和 Top 属性

5 坐标系 默认: ScaleMode属性 自定义 1 缇 2 磅(1”/72) 3 像素 4 字符 5 英寸 6 毫米 7 厘米
自定义 1 2 磅(1”/72) 3 像素 4 字符 5 英寸 6 毫米 7 厘米 默认: 单位:Twip(缇)=1/1440 英寸

6 自定义坐标系 使用Scale语句: Scale (x1,y1)-(x2,y2) 例 Scale (-4,2)-(4,-2) 始终有:
(0,0) - 4 4 -2 2 始终有: Scalewidth=x2-x ScaleHeight=y2-y1 均可能为负! 清更正第285页的错误!

7 容器及其与画图有关的属性 容器:窗体、图片框或打印机 坐标属性 AutoRedraw -自动重画 DrawWidth - 线条宽度
ScaleLeft 、 ScaleTop -左上角坐标 ScaleWidth、ScaleHeight - 宽度和高度 CurrentX、CurrentY - 当前坐标 AutoRedraw -自动重画 DrawWidth - 线条宽度 DrawStyle - 线条虚实样式 FillColor -填充色,FillStyle -填充样式 若DrawWidth>1,则 DrawStyle不起作用。

8 DrawMode属性

9 画点方法 PSet 格式: [对象名.]Pset [Step] (x,y) [,颜色] 例如:Pset (300,500),vbRed
(在点(300,500)处画一红点) Step 表示使用相对坐标即: CurrentX=CurrentX+x CurrentY=CurrentY+y 然后画点 例1 例2

10 画直线方法 Line 格式: 例:Line (0,0)-(100,50),vbBlue 画一条蓝线
Line [Step] [(x1,y1)]-[Step](x2,y2) [,颜色] [,B[F]] 其中: Step 表示使用相对坐标 起点坐标(x1,y1)的缺省值为(CurrentX,CurrentY) 终点坐标(x2,y2)不能省。 选择“B”将画出一个以(x1,y1)和(x2,y2) 为对角线的矩形。 如果再选择“F”,则以指定的颜色填充。 例:Line (0,0)-(100,50),vbBlue 画一条蓝线

11 画园或椭圆 格式: 说明:起点、终点用于画弧(弧度),比例用于画椭圆。起点、终点为负时,画出与圆心连线。 例如:
[对象名.]Circle [Step]<圆心坐标>,<半径> [,<颜色>,<起点>,<终点>,<比例>] 说明:起点、终点用于画弧(弧度),比例用于画椭圆。起点、终点为负时,画出与圆心连线。 例如: PictureBox1.Circle (0,0),100,vbBlue,,,0.5 画一个蓝色椭圆

12 清除(Cls)方法 用于清除用画图方法画出的图形和用 Print 语句打印的信息:
语句格式:对象名.Cls 例如:me.Cls Picture1.Cls 注意:如果AutoRedraw=False,则Cls方法不能清除在AutoRedraw为True时所产生的图形和打印的信息。

13 颜色及有关函数 颜色值用长整型数表示,如: 内置颜色函数: 颜色常量: 蓝色:&H00FF0000& 绿色:&H0000FF00&
RGB(red,green,blue) red,green,blue: 0~255 QBColor(n) n=0,1,2,…,15 颜色常量:

14 显示图片的控件 图片框-PictureBox 图像框-Image 图片的加载: 设计时:指定Picture的文件名
运行时:1。用LoadPicture函数 2。用其他控件的Picture属性赋值

15 图像框 Image的主要属性 Picture属性:所显示的图片 Strech属性: False(缺省):图不伸缩,框随图大小。
True:图随框大小伸缩。

16 图片框 PictureBox的主要属性 Picture属性:所显示的图片 AutoSize属性: False(缺省):框大小不随图变。
True:框大小随图变。


Download ppt "Visual Basic 第11章 图形与图象设计"

Similar presentations


Ads by Google