面向对象程序设计--Visual Basic6.0 教学课件 作者 朱丽敏 第6章图形设计.pptVIP

内 容 简 介 学习目标与要求 ★ 掌握坐标系与坐标单位的基本概念 ★ 掌握坐标系的使用 ★ 会使用颜色函数 ★ 掌握绘制基本图形的控件及绘制基本图形的方法 章 节 目 录 6．1坐标系统 6．2 颜色 6．3 绘制基本图形的控件 6．4 绘制基本图形的方法 6．1 坐标系统 6．1．1 默认坐标系统 6．1．2 用户自定义坐标系统 6.1.1 默认坐标系统 VB系统中的容器对象，都有一套默认的 坐标系统。 默认坐标原点（0，0）在其左上角，X 轴的正向水平向右，Y轴的正向垂直向下。 默认坐标的刻度单位是缇（twips）。 坐标系统中x的值由对象的Left属性决定，y值由对象的Top属性决定。 例如： Command1.Left=30Command1.Top=40 可以通过设置控件的ScaleMode属性来改变坐标系统的度量单位。下表列出了ScaleMode的属性值与对应的度量单位。 下面的程序代码表示Command1控件的坐标为（30，40），单位为毫米。 ScaleMode=6 Command1.Left=30 Command1.Top=40 设置对象的Scale属性值自定义坐标系统 可以使用容器对象的ScaleLeft、ScaleTop、ScaleWidth和ScaleHeight属性这4个Scale属性来创建用户自定义坐标系统。其含义见下表。 属性ScaleLeft与ScaleTop的值用来设置容器左上角的坐标。 属性ScaleWidth和ScaleHeight的值分别用来设置对象的宽度和高度。 ScaleWidth大于0表示X 轴的正向向右，小于0表示X轴的正向向左。 ScaleHeight大于0表示 Y轴的正向向下，小于0表示Y 轴的正向向上。 对象左上角坐标为（ScaleLeft，ScaleTop） 对象右下角的坐标为(ScaleLeft+ScaleWidth，ScaleTop+ScaleHeight) 。 例如： Form1.ScaleLeft=100 Form1.ScaleTop=-400 Form1.ScaleWidth=-600 Form1.ScaleHeight=700 Form1.ScaleWidth为负，Form1.ScaleHeight为正，则 X 轴的正向向左，Y轴的正向向下。 窗体Form1左上角的坐标为（100，-400），右下角的坐标为（-500，300）。 通过Scale方法自定义坐标系 ★语法如下： [对象．]Scale[(x1，y1)-(x2，y2)] ★说明： （1）对象可以是窗体、图形框或打印机。 （2）(x1，y1)表示对象的左上角的坐标值。 （3）(x2，y2)为对象的右下角的坐标值。 （4）Scale方法能将坐标系统重置到所选择的任意 刻度。 例如将窗体设置为上图的坐标系统，使用Scale方 法的语句如下： Form1.Scale (100,-400)-(-500,300) 6.2 颜色 6.2.1 使用系统定义的颜色常数 6.2.2 使用QBColor函数设置颜色 6.2.3 使用RGB函数设置颜色 6.2.1 使用系统定义的颜色常数 颜色值通过“视图”→“对象浏览器” →“ColorConstants”类中查询常数列表。 6.2.2 使用QBColor函数设置颜色 QBColor函数的格式：QBColor（颜色值） 颜色值代表的颜色见下表。 6.2.3 使用RGB函数设置颜色 ★函数格式：RGB(r,g,b) ★说明：r、g、b分别代表红、绿、蓝颜色分量的值，0表示亮度最低，而255表示亮度最高。 【例 6-1】 运用RGB函数使文字随机产生不同颜色 的动态闪烁效果。 操作步骤： （1）设置Form1的Picture属性，选