Visual Basic程序设计 [教程].ppt

Visual Basic程序设计 主讲教师：邵熹雯 绘画、图形、动画、字体 坐标系统 每个容器都有一个坐标系，构成一个坐标系，需要三个要素：坐标原点、坐标单位、坐标轴的长度与方向。 VB中的缺省坐标系与笛卡尔坐标系不同，它的原点在左上角，X轴向右，Y轴向下 自定义坐标系 坐标的单位：ScaleMode属性 默认单位：Twips 1 inch=1440 twips Point 1 inch=72 point（见教材P184表） 自定义坐标轴 方法一： Form1. Scaleleft=-50 Form1. Scaletop=50 Form1. Scalewidth=100 Form1. Scaleheight=100 方法二： Form1. Scale (-50,50)-(50,-50) 绘图状态属性 CurrentX属性/CurrentY属性 在容器上绘图时的当前坐标。 ForeColor属性/BackColor属性 对象的背景色和前景色 Form1. ForeColor=Vbblue Form1. backColor=VBwhite DrawWidth属性 画线的宽度或点的大小。Form1. DrawWidth=5 DrawStyle属性 画线的线形。0～６ 绘图状态属性 FillStyle属性 填充方式 0是实填充，1为透明方式。 FillColor属性 填充图案的颜色缺省为 0（黑色）。 DrawMode属性 这个属性用来确定用什么逻辑关系将一个图案画到另一个图案上。 决定最终颜色与当前画笔颜色、背景颜色的关系 =vbCopyPen, =vbXorPen 绘图状态属性 AutoRedraw属性 设置和返回对象或控件是否能自动重绘。 颜色表示 在Visual Basic系统中，所有的颜色属性都由一个Long整数表示 在代码中可使用4种方式给颜色赋值： Rgb(red,green,blue)函数 RGB函数可返回一个Long整数，用来表示一个RGB颜色值。 格式：RGB(red, green, blue) 说明：三个参数的范围是0～255，0表示最弱，255表示最强。 例如：设定背景为红色 Form1.BackColor = RGB(255, 0, 0) 颜色表示 使用QBColor函数 QBColor函数可返回一个Long整数，用来表示所对应颜色值的RGB颜色码。 格式：QBColor(color) 说明：color参数是一个界于0～15的整型数，分别代表16种颜色。 （见教材P185表）。 颜色表示 直接使用颜色设置值 格式： HBBGGRR 说明： BB指定蓝颜色的值 GG指定绿颜色的值 RR指定红颜色的值。 每个数段都是两位十六进制数，即从00～FF。 例如： Form1.BackColor = HFF0000 相当：Form1.BackColor = RGB(0, 0, 255) 颜色表示 使用系统定义的颜色常数 颜色常数包括： vbBlack，vbRed，vbGreen，vbYellow，vbBlue，vbWhite。 绘图方法 Visual Basic中提供了几个基本的绘图方法 Cls方法 格式： object . Cls 说明：Cls方法以背景色清除绘图区域。 绘图方法 Pset方法 在对象上画点。 格式：object . Pset (x, y) , color 说明：对象的(x, y)点处，用color参数确定的颜色画一个点。 color参数可以省略。默认点的颜色就是对象的前景色（ForeColor属性值） 示例1 在窗体中随机地显示若干彩色的点。 绘图方法 Line方法 画直线或方框。 格式： object . Line (x1, y1) - (x2, y2) , color 例如： Line (250,300) - (400,500) 可画一条从(250,300)到(400,500)点的直线。 Line - (400,500) 可从当前位置画到(400,500)。 绘图方法 Line (150,250) - Step (150,50) 出发点是(150,250)，终点是向X轴正向走150，向Y轴正向走50的点 Line方法绘制矩形： 格式： object . Line (x1, y1) - (x2, y2) , color,B/F (x1,y1)与(x2,y2)矩形的左上角和右下角的坐标 参数B表示要画一个矩形 参数F是指画一个实心的矩形 例如： Line (20,40) - Step (50,70), RGB(255,0,0), BF 用红色从(20,40)到(70,110)画一个实心的矩形。 示例2 单击“画线