《第9章程序设计基本结构剖析.》由会员分享，可在线阅读，更多相关《第9章程序设计基本结构剖析.（59页珍藏版）》请在金锄头文库上搜索。
1、第9章 绘制图形,Visual Basic为用户提供了内容丰富、功能强大的图形、图像处理功能。在Visual Basic中，已有的图形、图像文件通常在窗体、图片框、图像框等控件中显示；绘图采用两种方法：一是利用Visual Basic提供的Line和Shape控件绘制一般的几何图形；二是使用Visual Basic提供的绘图方法，如画点Pset方法、画线Line方法、画圆Circle方法等，用于在窗体、图片框等容器控件中直接绘制图形。,9.1 Visual Basic的坐标系统 9.2 颜色 9.3 常用绘图控件 9.4 绘图方法,第9章 绘制图形,9.1 Visual Basic的坐标系统,
2、坐标系统是绘制各种图形的基础。在Visual Basic中，每个对象都是定位于存放它的容器内。例如，窗体对象放置在屏幕内，屏幕是窗体的容器；同样窗体是放置控件对象的容器；框架控件和这一章要介绍的图片框等控件都可作为其他控件的容器。对象在容器中的定位需要使用坐标系统，在Visual Basic中坐标系统也称为对象坐标系统。 屏幕有自己的坐标系统，用于窗体的定位；每个窗体也都有自己的坐标系统，用于定位窗体上的控件。Visual Basic的坐标系统可分为：默认坐标系统和用户自定义坐标系统,9.1 Visual Basic的坐标系统,9.1.1 默认坐标系统 9.1.2 坐标度量单位 9.1.3 用
3、户自定义坐标系统,9.1.1 默认坐标系统,容器对象的默认坐标系统中，左上角坐标为（0，0），沿着水平方向向右移动、垂直方向向下移动时，坐标值增加。放置在容器中的对象，它的Left和Top属性指定了该对象的左上角距坐标系原点的水平方向和垂直方向的距离。如图9-1所示。,需要说明的是，只能在窗体或图片框上绘制图形，窗体的容器是系统对象Screen（屏幕），因此窗体的Left和Top属性值，是相对于屏幕坐标系原点（左上角）的水平方向和垂直方向的距离；而窗体又是其他控件的容器，所以窗体中各控件的Left和Top属性值，都是相对于窗体坐标系原点（左上角）的水平方向和垂直方向的距离。,图9-1窗体的坐标
4、系统,9.1.2 坐标度量单位,Visual Basic使用的坐标度量单位共有8种，见表9-1。系统默认的度量单位是缇（Twips），1厘米=576缇。用户根据需要，可以选择系统提供的其他标准度量单位。通过设置窗体或图片框的ScaleMode属性定义度量单位，在程序的界面设计阶段，在属性窗口选中ScaleMode属性并单击其右侧的向下箭头按钮，将显示如图9-2所示的下拉列表，可以从中选择所需要的度量单位。,9.1.2 坐标度量单位,说明： （1）上表中，除了0和3外，其余度量单位设置均可用于打印机。 （2）ScaleMode属性可以在属性窗口设置，也可以通过程序代码设置。 例如， Form1.
5、 ScaleMode=5 窗体坐标系统以英寸为单位 Picture1. ScaleMode=7 图片框坐标系统以厘米为单位,9.1.2 坐标度量单位,图9-2 度量单位选择,9.1.3 用户自定义坐标系统,用户自定义坐标系统指的是用户自己定义容器中的对象（如屏幕上的窗体，窗体上的图片框）本身的坐标系，包括坐标原点和刻度。容器中的对象在容器中的位置是由其Left和Top属性决定的。 容器中的对象本身的坐标系，默认对象的左上角为原点（0，0），坐标值沿水平方向向右增加，沿垂直方向向下增加，并且刻度单位都是规范的。Visual Basic允许用户自定义坐标系统，包括原点的位置、轴线方向和轴线刻度。,
6、9.1.3 用户自定义坐标系统,(1).用ScaleLeft、ScaleTop、 ScaleHeight和ScaleWidth属性自定义坐标系统 (2).用Scale方法定义坐标系统,9.1.3 (1)用ScaleLeft、ScaleTop、 ScaleHeight和ScaleWidth属性自定义坐标系统,ScaleLeft和ScaleTop属性用于设置和返回窗体或图片框左上角的坐标值，ScaleLeft是X坐标的最小值。 ScaleHeight和ScaleWidth用于设置和返回窗体或图片框内部宽度和高度等分份数。这里的宽度和高度是指除去了边界和标题行后的净宽度和净高度（内部刻度），即用户自
7、定义的坐标刻度单位。X坐标的最大值为ScaleLeft+ScaleWidth。,9.1.3 (1)用ScaleLeft、ScaleTop、 ScaleHeight和ScaleWidth属性自定义坐标系统,上面四个属性既可以是正数，也可以是负数。如果ScaleLeft和ScaleTop属性值为0，则自定义坐标系统的原点仍位于对象的左上角；如果ScaleLeft大于0，则Y轴沿X轴向左移；如果ScaleLeft小于0，则Y轴沿X轴向右移；如果ScaleTop大于0，则X轴沿Y轴向上移；如果ScaleTop小于0，则X轴沿Y轴向下移。同时，如果ScaleWidth小于0，则X轴的正向向左；如果Sca
8、leHeight小于0，则Y轴的正向向上。,9.1.3 (1)用ScaleLeft、ScaleTop、 ScaleHeight和ScaleWidth属性自定义坐标系统,例如，设置窗体左上角的坐标为（100，150），右下角的坐标为（300，220），则可以用如下代码： Form1.ScaleTop=150 Form1.ScaleLeft=100 Form1.ScaleWidth=200 Form1.ScaleHeight=70 定义的坐标系如图9-3所示。 下面的代码可将窗体坐标原点定义在左下角，向上向右时坐标值增加，与数学中的坐标系一致，右上角的坐标为（120，100），更符合绘制各种曲线图
9、的习惯。其坐标系如图9-4所示。 Form1.ScaleLeft=20 Form1.ScaleTop=100 Form1.ScaleWidth=100 Form1.ScaleHeight=-100,图9-3 用户自定义坐标系统示例,图9-4 ScaleHeight属性为负值,9.1.3 (2)用Scale方法定义坐标系统,Scale方法是用户定义对象坐标系统的实用方法，用它可以代替介绍的用ScaleLeft、ScaleTop、ScaleWidth和ScaleHeight属性定义坐标系统。使用此方法可以直接定义对象左上角坐标和右下角坐标值，一旦这两个对角坐标确定了，则另外两个角的坐标值也就唯一确
10、定。 Scale方法定义坐标系统格式如下： .Scale （x1,y1）-（x2,y2）,9.1.3 (2)用Scale方法定义坐标系统,.Scale （x1,y1）-（x2,y2） (1)对象名为窗体或图片框名称，默认为窗体。 (2)如果Scale后面不带任何参数，则使用默认坐标系统 （x1,y1）和（x2,y2）分别为窗体或图片框左上角和右下角的坐标。这4个坐标参数和前面的4个属性的对应关系如下： ScaleLeft=x1 ScaleTop=y1 ScaleWidth=x2-x1 ScaleHeight=y2-y1,例如，下面的代码可将坐标原点设置在图片框Picture1的中心，其坐标位置
11、如图9-5所示。 Private Sub Form_Load（） Picture1.ScaleLeft = -15 Picture1.ScaleTop = -25 Picture1.ScaleWidth = 30 Picture1.ScaleHeight = 50 End Sub 如果使用Scale方法，代码如下： Private Sub Form_Load（） Picture1.Scale （-15, -25）-（15, 25） End Sub,图9-5 坐标点（x1，y1）和（x2，y2）示意图,9.1.3 (2)用Scale方法定义坐标系统,9.2 颜色,在设计阶段通过属性的设置可以控制
12、窗体或控件的颜色。如果要在程序的运行期间设置对象的颜色，就必须使用颜色参数。 在程序运行期间指定颜色参数值有如下4种方式： 9.2.1 RGB函数 9.2.2 QBColor函数 9.2.3 使用颜色常量 9.2.4 直接使用颜色值,9.2.1 RGB函数,RGB是Red（红色）、Green（绿色）、Blue（蓝色）的缩写，任何颜色都是由红、绿、蓝三种颜色按不同比例混合的结果。RGB函数通过指定红、绿、蓝不同的分量值得到不同的颜色，RGB函数的格式如下： RGB（红色值，绿色值，蓝色值） 取值范围为0255，分别代表所要颜色中红、绿、蓝分量的大小。 如将红色和绿色混合可得到黄色，即 RGB（2
13、55，255，0），其中0表示没有蓝色。,9.2.2 QBColor函数,QBColor函数用一个整数值对应RGB的常用颜色值。QBColor函数的格式如下： QBColor（颜色值） 其中颜色值是一整数，取值范围015代表16种基本颜色，其对应关系见表9-2。,表9-2 QBColor函数的颜色值与颜色的对照表,9.2.2 QBColor函数,例如，若要将标签Label1的背景颜色设置为淡青色，可以使用下面的语句： Label1.BackColor=QBColor（11）,表9-3 常用颜色常量,Visual Basic定义了8种常用的颜色常量，在程序中可以直接引用这些常量，它们的取值见表9
14、-3。,例如，若要将文本框的字体颜色设置为蓝色，可以使用下面的语句： Text1.ForeColor=VbBlue,9.2.3 使用颜色常量,9.2.4 直接使用颜色值,使用RGB函数、QBColor函数以及系统内部的颜色常量来指定颜色都不是直接的，因为Visual Basic只是将它们解释为与所代表的颜色比较接近的一种。如果了解Visual Basic是如何用数值来指定颜色，就可以给颜色参数和属性指定一个准确值确定颜色。 通常用十六进制表示颜色值，表示方法为&HBBGGRR 。其中&H表示该数为十六进制，BB代表蓝色分量的十六进制值（00FF），GG代表绿色分量的十六进制值（00FF），RR
15、代表红色分量的十六进制值（00FF），将这三个原色按以上格式构成一个十六进制数，即可代表相应的颜色。例如，&HFF0000 表示蓝色，&H0000FF 表示红色。,9.3 常用绘图控件,Visual Basic提供了两种绘图方法： 一是使用绘图控件，例如Line控件和Shape控件； 二是使用绘图方法，例如，Line画线方法、Circle画圆方法等。使用绘图控件无需编写代码，但它提供的绘图样式有限，只能实现简单功能，要想实现高级功能，还需要采用绘图方法。 直线Line控件和形状Shape控件可用来在窗体、图片框或框架上绘图，这些控件不支持任何事件，只用于表面修饰。,直线（Line）控件在工具箱
16、中的图标为 ，默认名称为Line1。使用Line控件可以在窗体、图片框和框架上画出各种直线，在设计阶段通过属性的设置确定直线的位置、长度、粗细、颜色和线型等。程序运行时不能使用Move方法移动Line控件，但可以通过改变直线控件的X1、Y1、X2、Y2属性来移动或调整它的大小。Line控件的常用属性见表9-4。,表9-4 直线控件的常用属性,9.3.1 Line控件,9.3.1 Line控件,表9-5 BorderStyle属性取值,【例9-1】设计一个窗体，在窗体上用直线绘制一个长方体图形，并根据用户输入的边长计算长方体的体积。 （1）设计程序界面，如图9-6左图所示。在窗体上添加一个图片框，在该图片框上用Line控件绘制一个长方体图形，再添加一个框架，在其中添加4个标签、4个文本框和1个命令按钮，用于输入边长和计算长方体的体积。 （2）编写程序代码，程序的执行结果如图9-6右图所示。,9.3.1 Line控件,图9-6界面设计和运行结果,直线（Line）控件在工具箱中的图标为 ，默认名称为Line1。使用Line控
