第八章绘图 武汉职北技术孝院 本章要求: 1.理解V中坐标系的概念; 2.掌握用Line控件、 Shape控件画直线、矩形、圆 (弧)、椭圆的方法; 3掌握图片框、图象框的常用属性、常用方法、图 片的载入及应用; 4.掌握用Pset方法、Line方法、 Circle方法画点、 矩形、圆(弧)、椭圆的方法; 本章重点: VB中坐标系,绘图方法的使用 本章难点: 容器控件的坐标,及用户自定义坐标系
第八章 绘图 本章要求： 1.理解VB中坐标系的概念； 2.掌握用Line控件、Shape控件画直线、矩形、圆 （弧）、椭圆的方法； 3.掌握图片框、图象框的常用属性、常用方法、图 片的载入及应用； 4.掌握用Pset方法、Line方法、Circle方法画点、 矩形、圆（弧）、椭圆的方法； 本章重点： 本章难点： VB中坐标系，绘图方法的使用 容器控件的坐标，及用户自定义坐标系
8.1坐标系统 武汉职业技术学晚 8.1.1标准系统 每个容器都有一个坐标系,构成一个坐标系,需要 个要素:坐标原点、坐标度量单位、坐标轴的长度与方向。 坐标度量单位由容器对象的 ScaleMode属性决定。缺省时为 Twip。每英寸1440个Twip,20个Twip为一磅。 l窗体图片容器的省坐标系练 网可K (0,0) x Height ScaleHeight
8.1 坐标系统 8.1.1 标准系统 每个容器都有一个坐标系，构成一个坐标系，需要 三个要素：坐标原点、坐标度量单位、坐标轴的长度与方向。 坐标度量单位由容器对象的ScaleMode属性决定。缺省时为 Twip。每英寸1440个Twip，20个Twip为一磅
8.1坐标系统 武汉职业技术学晚 8.1.2用户自定义坐标系统 在 Vi sua| Basic中可以通过设置 ScaleMode属性来建立新的 坐标系统。建立的新的坐标系统称为自定义系统。 1、设置坐标系统的刻度单位 列用户可用 ScaleMode属性设置坐标系统的刻度单位。 ScaleMode属性的取值及含义见Pg173表8.1所示
8.1 坐标系统 8.1.2 用户自定义坐标系统 1、设置坐标系统的刻度单位 列用户可用ScaleMode属性设置坐标系统的刻度单位。 ScaleMode属性的取值及含义见Pg173表8.1所示。 在Visual Basic中可以通过设置ScaleMode属性来建立新的 坐标系统。建立的新的坐标系统称为自定义系统
8.1坐标系统 武汉职业技术学晚 ScaleMode的值 含义 O-User 用户自己定义 1-Twip 缺省值以Twp为单位 2-Point 以打印机点为单位,1P=20Twit 3-Pixel 以相素点为单位 4-Character 对应系统字符的大小 5-Inck 以英寸为单位 6-Millimeter 以毫米为单位 7-Centimeter 以厘米为单位
ScaleMode的值 含 义 0-User 用户自己定义 1-Twip 缺省值以Twip为单位 2-Point 以打印机点为单位，1P=20Twit 3-Pixel 以相素点为单位 4-Character 对应系统字符的大小 5-Inck 以英寸为单位 6-Millimeter 以毫米为单位 7-Centimeter 以厘米为单位 8.1 坐标系统
8.1坐标系统 武汉职业技术学晚 说明: (1)当设置容器对象(例如,窗体或图片框)的 ScaleMode属性值>0,将使容器对象的 Scaleleft和 Sca|eTop自动设置为0, Scaleheight和 ScaleWidth的度 量单位也将发生改变。 (2)用 ScaleMode属性只能改变刻度单位,不能改变坐 标原点及坐标轴的方向
8.1 坐标系统 说明： （1）当设置容器对象（例如，窗体或图片框）的 ScaleMode 属性值 >0 ， 将 使 容 器 对 象 的 ScaleLeft 和 ScaleTop 自动设置为0，ScaleHeight 和 ScaleWidth 的度 量单位也将发生改变。 （2）用ScaleMode属性只能改变刻度单位，不能改变坐 标原点及坐标轴的方向
坐标系统 武汉职业技术学晚 定义新的坐标系统格式如下: [对象.] Sca leleft=X [对象.] ScallOp=Y 建立起的坐标系统,水平方向、垂直方向的刻度属性分别由 ca lewidth、 ScaleHeight属性来设置,其格式如下: [对象.] Sca leWidth宽度 [对象.] ScaleHeight=高度
8.1 坐标系统 定义新的坐标系统格式如下： [对象.] ScaleLeft＝X [对象.] ScaleTop＝Y 建立起的坐标系统,水平方向、垂直方向的刻度属性分别由 ScaleWidth、ScaleHeight 属性来设置，其格式如下： [对象.] ScaleWidth=宽度 [对象.] ScaleHeight=高度
8.1坐标系统 武汉职业技术学晚 例如:在窗体中建立两个文本框,把它们分别移到窗体的左上角 和右下角并显示其宽度和高度(相对于窗体),如图所示。 orm 106.7308 Text1 Text2 85.91549
8.1 坐标系统 例如：在窗体中建立两个文本框，把它们分别移到窗体的左上角 和右下角并显示其宽度和高度（相对于窗体），如图所示
8.1坐标系统 武汉职业技术学晚 程序如下: S ub Form Cl ick o Sca leleft=100 ScaleTop=100 Scalewidth=300 Scalene i ght=300 Text1. Move 100100 Text1. text=Str$(Text1 Width) Text2 Move 400- Text1 Width, 400-Text1 Height Text2. Text=Str$(Text2. He i ght) End Sub
S ub Form_Click() ScaleLeft=100 ScaleTop=100 ScaleWidth=300 ScaleHeight=300 Text1.Move 100,100 Text1.text=Str$(Text1.Width) Text2.Move 400 – Text1.Width, 400 – Text1.Height Text2.Text=Str$(Text2.Height) End Sub 程序如下： 8.1 坐标系统
8.1坐标系统 武汉职业技术学晚 例8.1将窗体的坐标系统的原点定义在其中心,X轴的 正向向右,Y轴的正向向上,窗体高与宽分别为200和300单 位长度。 通过Sa|eTop, Scaleleft, Scalewidthi和Sca| hEight 属性实现。 s. Fornl 回区 Form1. Scaleleft =-150 (100,-150) Y Form1.Sca1eT。p=100 Form1. ScaleWidth 300 Forml ScaleHeight =-200 (-100,150
8.1 坐标系统 例8.1 将窗体的坐标系统的原点定义在其中心，X轴的 正向向右，Y轴的正向向上，窗体高与宽分别为200和300单 位长度。 通过ScaleTop，ScaleLeft，ScaleWidth和ScaleHeight 属性实现。 Form1.ScaleLeft = -150 Form1.ScaleTop = 100 Form1.ScaleWidth = 300 Form1.ScaleHeight = -200
82形状控件和直线控件 武汉职北技术学恍 8.2.1形状控件 Shape 使用 Shape控件可在窗体、框架或图片框中创建矩形 正方形、椭圆形、圆形、圆角矩形或圆角正方形等图形。 Shape控件预定义形状是由 Shape属性的取值决定的 Form1 0 3 5 Shape属性取不同值对应的形状
8.2 形状控件和直线控件 8.2.1 形状控件Shape 使用Shape控件可在窗体、框架或图片框中创建矩形、 正方形、椭圆形、圆形、圆角矩形或圆角正方形等图形。 Shape控件预定义形状是由Shape属性的取值决定的。 Shape属性取不同值对应的形状