[其它]第11章 图形、图像和动画.ppt

Visual Basic 程序设计 第11章 图形、图像和动画 内容简介 11.1 坐标与颜色 11.1.1 坐标系统 1．坐标系统概述 坐标系统是一个二维网格，可定义屏幕上、窗体中或其他容器中（如图片框）任意点的位置。比如窗体中某点的位置使用窗体坐标系统(x, y)来描述： x值：是沿X轴点的位置，窗体中最左端是缺省位置0。 y值：是沿Y轴点的位置，窗体中最上端是缺省位置0。 11.1 坐标与颜色 2．坐标的刻度 沿坐标轴定义位置的单位，统称为刻度。在VB中，坐标系统的每个轴都有自己的刻度。如果使用不同的测量单位，则可用的刻度值就不同。 所有Visual Basic的移动、调整大小和图形绘制语句，根据缺省规定，使用缇（Twip）为测量单位。缇是打印机的一磅的1/20（1440缇等于一英寸；567缇等于一厘米）。 除了使用缺省测量单位缇以外，通过设置控件的ScaleMode属性，还可以用其他标准刻度来指定。 11.1 坐标与颜色 表11－1 ScaleMode属性取值及说明 11.1 坐标与颜色 如果将ScaleMode设置为vbUser，并且利用以下4个属性来详细定义坐标系统：ScaleLeft和ScaleTop;ScaleWidth和ScaleHeight。 比如定义窗体的坐标系统为：起点坐标（40，40），最大坐标（100，100），需要这样设置有关属性： Form1.ScaleMode = vbUser Form1.ScaleLeft = 40 Form1.ScaleTop = 40 Form1.ScaleWidth = 60 Form1.ScaleHeight = 60 11.1 坐标与颜色 3．不同刻度的转换 使用ScaleX和ScaleY方法，用来将水平坐标或垂直坐标值从一种刻度模式转换为另一种刻度模式。语法如下： [object.]ScaleX (value [, fromScale [, toScale]]) [object.]ScaleY (value [, fromScale[,toScale]]) 11.1 坐标与颜色 将1厘米的宽度转换为以缇为单位的宽度数并输出： Debug.Print Form1.ScaleX(1, vbCentimeters, vbTwips) ,输出结果为：566.9286 11.1.2 颜色 1．使用颜色常量 表11－2 VB颜色常数值 11.1 坐标与颜色 2．使用QBColor函数 QBColor函数采用QuickBasic所使用的16种颜色，语法格式为： QBColor（颜色码） 颜色码是0～15之间的整数，每个颜色码代表一种颜色。 表11－3 QBColor函数颜色码值 11.1 坐标与颜色 3．使用RGB函数 RGB函数通过红、绿、蓝三基色混合产生某种颜色，其语法为：RGB（红色值、绿色值、蓝色值） 自变量红色值、绿色值、蓝色值的范围是0～255之间的整数。例如，RGB(0, 0, 0)的函数值是黑色，RGB(255, 255, 255)的函数值是白色。 4．使用颜色值 RGB函数及QBColor函数实际上都返回一个6位十六进制的长整数，这个数从左到右，每两位一组代表一种基色，它们的顺序是蓝绿红。例如，红色的代码为H0000FF。 11.2 绘图属性 1. 当前坐标 窗体或图片框的CurrentX、CurrentY属性给出在这些对象中用绘图方法作图时的当前坐标。 2. 线宽 窗体或图片框的DrawWidth属性给出在这些对象中用绘图方法画线的宽度或点的大小。DrawWidth属性以像素点为单位，最小值为1。 如果使用控件作图，则通过BorderWidth属性定义线的宽度和点的大小。 11.2 绘图属性 3. 线型 窗体或图片框的DrawStyle属性给出在这些对象上用绘图方法所画线的形状。 表11－4 DrawStyle属性设置 11.2 绘图属性 如果使用控件作图，则可通过BorderStyle属性设置所画线的形状。它的属性设置与DrawStyle类似，BorderStyle 缺省值为1表示实线。 表11－5 BorderStyle属性对BorderWidth属性的影响 11.2 绘图属性 4. 填充 封闭图形的填充方式由FillColor和FillStyle这两个属性决定。 表11－6 FillStyle属性设置 11.3 图形控件 VB的控件工具箱中有两种绘图控件：形状控件（Shape）和直线控件（Line）。这两个控件不支持任何事件，只用于表面装饰。 通过设置Shape对象的Shape属性实现所需的形状。 表11－7 Shape对象Shape属性值 11.4 绘图方法 VB还提供了一些绘图方法，如Pset、