VB(5.1)绘制正弦曲线.ppt

汝南县职业教育中心 汝南县职业教育中心 汝南县职业教育中心 Visual Basic 6.0程序设计 第5章 多媒体程序设计 ————任务1 绘制正弦曲线 *／9 第5章目录 任务1 绘制正弦曲线 【知识点】 窗体坐标系(Scale) 使用颜色(QBColor和RGB) PSet和Line语句 *／9 任务1 绘制正弦曲线 1、窗体坐标系： 第5章目录 *／9 任务1 绘制正弦曲线 1、窗体坐标系： 第5章目录 *／9 任务1 绘制正弦曲线 1、窗体坐标系： VB的坐标系统分为 默认规格(Default Scale)； 标准规格(Standard Scale)； 自定义(Custom Scale) 坐标系三要素：原点、度量单位 、坐标轴的方向； 第5章目录 *／9 任务1 绘制正弦曲线 1、窗体坐标系： 默认规格坐标系 在默认规格坐标中，对象的左上 角坐标为（0，0），当沿着水平向右 移动和沿垂直轴向下移动时，坐标值 增加。对象的Top和Left属性指定了 该对象左上角的距原点在垂直方向和 水平方向的偏移量。 第5章目录 *／9 任务1 绘制正弦曲线 1、窗体坐标系： 标准规格坐标系 ScaleMode属性指定坐标的度量单位 例：Picture1.ScaleMode=0 Picture1.ScaleMode=3 注：vbUser和vbPixels不能用于打印机 第5章目录 *／9 任务1 绘制正弦曲线 1、窗体坐标系： 自定义规格坐标 默认规格和标准规格坐标系都以对象左上角（0，0）为原点，坐 标值沿水平方向向右增加，沿垂直方向向下增加并且量度单位都 是规范的。VB允许用户定义自己的坐标系统，包括原点位置、轴 线方向和轴线“刻度”。 自定义规格坐标系统： 1）采用Scale方法来设置坐标 [对象].Scale[(x1,y1)-(x2,y2)] [对象].Scale[(xLeft,yTop)-(xRight,yBottom)] (x1,y1)为左上角坐标 (x2,y2)为右下角坐标 例：Picture1.Scale(-10,10) – (10,-10) 注：Scale方法不带参数时，则取消用户自定义的坐标系，而采用默认的坐标系。 picture1.scale 第7章目录 *／9 任务1 绘制正弦曲线 1、窗体坐标系： 自定义规格坐标 第7章目录 （-10，10） Form1.Scale (-10, 10 )-( 10，-10) （10，-10） *／9 任务1 绘制正弦曲线 1、窗体坐标系： 自定义规格坐标 2）通过对象的ScaleTop、ScaleLeft、ScaleWidth 、ScaleHeight 四项属性来实现 Form1.ScaleLeft = -14 Form1.ScaleTop = 14 Form1.ScaleWidth = 28 Form1.ScaleHeight = -28 ScaleTop、ScaleLeft的值用于指定对象左上角坐标，缺省值为0， 坐标原点在对象的左上角， 当改变ScaleLeft、ScaleTop的值后，坐标系的X轴或Y轴按此值平 移形成新的坐标原点。 对象右下角坐标为 （ScaleLeft+ScaleWidth，ScaleTop+ ScaleHeight） ScaleWidth，ScaleHeight指对象的内部尺寸，不包括边框厚度以及 菜单或标题等高度 第7章目录 *／9 任务1 绘制正弦曲线 2、 使用颜色 QBColor函数和RGB函数 (1) QBColor函数 QBColor(颜色码） 例：Picture1.ForeColor = QBColor(0) 颜色码取值为0-15 （书P118表5-2 ），每个颜色码代表一种颜色。 ( 2) RGB 函数 通过红、绿、蓝三原色混合产生 RGB（红，绿，蓝）—— R, G, B 均为0-255之间的整数 例：Private Sub setcolor() lblsample.ForeColor = RGB(hsbcolor(0).Value, hsbcolor(1).Value, hsbcolor(2).Value) End Sub 第5章目录 *／9 任务1 绘制正弦曲线 3、 PSet和Line语句 （1） PSet方法 作用：是在窗体、图片框等对象上绘制一个点。 语法格式为： [对象名].PSet [Step] (x, y) [,颜色] 例：Picture1.PSet (X,