《图形操作》PPT课件

前坐标(CurrentX，CurrentY)的坐标，即从当前坐标分别
平移x1和y1个度量单位后的位置，其绝对坐标为
(CurrentX+x1，CurrentY+y1)。
12
编辑课件ppt
8.2 绘图属性
8.2.1 当前坐标
例8-4 通过当前横坐标、纵坐标的适当偏移，输 出立体字效果。如图所示。
演示 程序
绘制控件，窗体就是控件的容器。如果在图片框控件
内绘制图形，该图片框就是容器。容器内的对象只能
在容器界定的范围内变动。当移动容器时，容器内的
对象也随着一起移动，而且与容器的相对位置保持不
变。
VB的每个容器对象都有一个坐标系。构成一个坐
标系，需要三个要素：坐标原点、坐标度量单位以及
坐标轴的长度与方向。
3
6
编辑课件ppt
8.1 Visual Basic的坐标系统
8.1.2 自定义坐标系统
用户可以改变对象的坐标系统，即自行定义坐标系统
的原点、坐标轴的方向等，有以下两种方法：
1．修改属性值 通过修改对象的ScaleLeft、ScaleTop、ScaleWidth 和ScaleHeight四个属性来设定自定义坐标系统： （1）按需要改变ScaleLeft，ScaleTop值后，坐标系 的X轴和Y轴按此值平移形成新的坐标原点。 （2）容器控件左上角的X、Y坐标值为(ScaleLeft， ScaleTop)，容器右下角坐标值为 (ScaleLeft+ScaleWidth，ScaleTop+ScaleHeight)。
设ScaleMode属性值为5（即坐标度量单位为英寸）， 如果ScaleWidth值为10，则表示该对象水平方向宽 度为10英寸。
注意：
（1）ScaleLeft、ScaleTop属性与Left、Top属性
的区别。
（2）ScaleHeight、ScaleWidth属性与Height、
Width属性的区别。
编辑课件ppt
8.1 Visual Basic的坐标系统
8.1.1 标准坐标系统
（1）坐标的度量单位由对象的ScaleMode属性 决定，ScaleMode的取值如表所示。
ScaleMode 属性值
含义
ScaleMode 含义 属性值
0 - User
用户自定 4 -
义
Charact
er
字符
1 - Twip
演示 程序
10
编辑课件ppt
8.1 Visual Basic的坐标系统
8.1.2 自定义坐标系统
例8-3 使用Line(0, 0) - (1000, 1000)绘制一条直 线，观察在不同坐标系下的图形效果。程序运行结果 如图所示。
11
编辑课件ppt
8.2 绘图属性
8.2.1 当前坐标
窗体、图片框等的CurrentX、CurrentY属性给出这些
第8章 图形操作
1
编辑课件ppt
本章要点
Visual Basic的坐标系统 绘图属性 绘图方法
图形处理与应用
2
编辑课件ppt
8.1 Visual Basic的坐标系统
8.1.1 标准坐标系统
在Visual Basic中，每个对象定位于存放它的容器
内，对象定位都要使用容器的坐标系。例如，窗体处
于屏幕（Screen）内，屏幕是窗体的容器。在窗体内
缇(默认 5 - IncΒιβλιοθήκη Baidu 值)
英寸
2 - Point
点
4
6Millime
ter
毫米
编辑课件ppt
8.1 Visual Basic的坐标系统
8.1.1 标准坐标系统
（2）ScaleLeft和ScaleTop属性用于控制容器对 象左边和顶边的坐标，根据这两个属性值可形成坐标
原点。无论采用哪一种坐标度量单位，所有容器对象
例8-1 自定义一个坐标系统， 使坐标原点（0，0）在窗体的 中央位置，X轴向右为正，Y 轴向上为正。对应的坐标系统 如图8-2所示。
8
编辑课件ppt
8.1 Visual Basic的坐标系统
8.1.2 自定义坐标系统
2．使用Scale方法设置坐标系
这是用户建立自定义坐标系最方便的方法，格式：[对
7
编辑课件ppt
8.1 Visual Basic的坐标系统
8.1.2 自定义坐标系统
（3）根据容器左上角和右下角坐标值的大小，自动设
置坐标轴的正向。
（4）ScaleWidth，ScaleHeight属性为X轴和Y轴刻 度总数，即，X轴和Y轴的刻度度量单位值为 1/ScaleWidth 和 1/ScaleHeight。
对象在绘图时的当前横、纵坐标。这两个属性只能在程序
中设置和引用。语法格式:
[对象.]CurrentX [= x]
[对象.]CurrentY [= y]
当坐标系统确定后，对象上的某一坐标点(x1,y1)表示对
象上的绝对坐标位置，如果坐标值前加上关键字step，则
step(x1, y1)表示对象上的相对坐标位置，它是相对于当
ScanLeft = xLeft
ScanTop = yTop
ScanWidth = xRight – xLeft
9
ScanHeight = yBottom - yTop
编辑课件ppt
8.1 Visual Basic的坐标系统
8.1.2 自定义坐标系统
例8-2 使用Scale方法自定义一个坐标系统，使坐标 原点（0，0）在窗体的中央位置，X轴向右为正，Y轴 向上为正。对应的坐标系统如图所示。
象.]Scale [(xLeft, yTop) - (xRight, yBottom)]
功能：在程序中自定义坐标系。Scale后面若不带参数，
则表示取消用户自定义坐标系，采用默认坐标系。
其中：(xLeft, yTop）为容器控件的左上角坐标,
(xRight,yBottom)为右下角坐标。与属性的对应关系是
的ScaleLeft和ScaleTop属性的默认值均为0，即坐
标原点在对象的左上角。横向向右为x轴正向，纵向
向下为y轴正向。
(0, 0)
x
(0, 0)
x
y
y
5
编辑课件ppt
8.1 Visual Basic的坐标系统
8.1.1 标准坐标系统
（3）ScaleWidth和ScaleHeight属性确定对象 内部水平方向和垂直方向的坐标度量单位数。例如，
13
编辑课件ppt
8.2 绘图属性
8.2.2 线宽与线型
1．线宽 窗体、图片框、打印机等的DrawWidth属性用于设 置容器内所画线的宽度或点的大小。其语法格式为：