Visual Basic程序设计 (2).pptVIP

* 第八章 绘图 本章要求： 1.理解VB中坐标系的概念； 2.掌握用Line控件、Shape控件画直线、矩形、圆（弧）、椭圆的方法； 3.掌握图片框、图象框的常用属性、常用方法、图片的载入及应用； 4.掌握用Pset方法、Line方法、Circle方法画点、矩形、圆（弧）、椭圆的方法； 本章重点： 本章难点： VB中坐标系，绘图方法的使用 容器控件的坐标，及用户自定义坐标系 8.1 坐标系统 8.1.1 标准系统 每个容器都有一个坐标系，构成一个坐标系，需要三个要素：坐标原点、坐标度量单位、坐标轴的长度与方向。坐标度量单位由容器对象的ScaleMode属性决定。缺省时为Twip。每英寸1440个Twip，20个Twip为一磅。 8.1 坐标系统 8.1.2 用户自定义坐标系统 1、设置坐标系统的刻度单位 列用户可用ScaleMode属性设置坐标系统的刻度单位。ScaleMode属性的取值及含义见Pg173表8.1所示。 在Visual Basic中可以通过设置ScaleMode属性来建立新的 坐标系统。建立的新的坐标系统称为自定义系统。 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 和 ScaleTop 自动设置为0，ScaleHeight 和 ScaleWidth 的度量单位也将发生改变。 （2）用ScaleMode属性只能改变刻度单位，不能改变坐标原点及坐标轴的方向。 8.1 坐标系统 定义新的坐标系统格式如下： [对象.] ScaleLeft＝X [对象.] ScaleTop＝Y 建立起的坐标系统,水平方向、垂直方向的刻度属性分别由ScaleWidth、ScaleHeight 属性来设置，其格式如下： [对象.] ScaleWidth=宽度 [对象.] ScaleHeight=高度 8.1 坐标系统 例如：在窗体中建立两个文本框，把它们分别移到窗体的左上角 和右下角并显示其宽度和高度（相对于窗体），如图所示。 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单位长度。 通过ScaleTop，ScaleLeft，ScaleWidth和ScaleHeight属性实现。 Form1.ScaleLeft = -150 Form1.ScaleTop = 100 Form1.ScaleWidth = 300 Form1.ScaleHeight = -200 8.2 形状控件和直线控件 8.2.1 形状控件Shape 使用Shape控件可在窗体、框架或图片框中创建矩形、正方形、椭圆形、圆形、圆角矩形或圆角正方形等图形。 Shape控件预定义形状是由Shape属性的取值决定的。 Shape属性取不同值对应的形状 8.2 形状控件和直线控件 1．填充方式 ——FillStyle属性 下图是形状控件的FillStyle属性设置为0~8时的填充效果 说明： （1）FillStyle为0是实填充，1为透明方式。填充图案的颜色由FillColor属性来决定。 （2）对于窗体和图片框对象，Fillstyle属性设置后，并不能看到其填充效果，而只能在使用Circle 和 Line 图形方法生成的圆和方框时，在圆和方框中显示其填充效果。 8.2 形状控件和直线控件 例8.2 编写一个程序显示Shape控件的6种形状，并设置不同的填充 样式。 P