中国民航飞行学院Visual Basic 程序设计课件第九章 图形设计.pptVIP

9.1 坐标系统和颜色9.1.1 坐标系统 坐标原点、坐标度量单位、坐标轴的长度与方向 1.坐标度量单位(坐标刻度) 由容器对象的ScaleMode属性决定 如：在窗体上绘制控件及图形，窗体为容器对象。 2.VB的缺省坐标系统 3.自定义坐标系 方法一：设置对象的相关坐标属性 【例9-1】在窗体的单击事件中定义窗体Form1的坐标系 Private Sub Form_Click() Cls Form1.ScaleLeft = -200 Form1.ScaleTop = 250 Form1.ScaleWidth = 500 Form1.ScaleHeight = -400 End Sub 方法二：采用Scale方法来设置坐标系 [对象.] Scale[(左上角坐标) – (右下角坐标)] 【例9-2】假定当前对象为窗体Form1，则代码： Me.Scale(-200,250) – (300,-150) 采用的Scale方法所定义的坐标系与例9-1是等效的 9.1.2 使用VB颜色 1.QBColor函数 QBColor(color) color参数是介于0～15的整型值 2.RGB函数 RGB(R,G,B) R、G、B分别指明三原色中红色、绿色、蓝色的比例，它们的取值范围为0～255。 1.线条控件(Line) 在窗体、图片框和框架中画各种直线段。通过使用Line控件在窗体上可视化地安排直线的位置、长度、宽度、颜色等。 常用属性： X1、X2、Y1和Y2 BorderStyle（边框风格）属性 BorderWidth（线宽）属性 2.形状控件(Shape) Shape控件预定义了6种形状，通过设置Shape属性来实现 所需形状。 9.2.3 图形控件与动画 【例9-3】 Timer1的Timer事件代码： Private Sub Timer1_Timer() t = t + 1 Shape3.Left = x0 + Shape1.Tag * Cos(pi * t / 30) - 90 Shape3.Top = y0 - Shape1.Tag * Sin(pi * t / 30) - 90 Line1.X2 = Shape3.Left + 90 Line1.Y2 = Shape3.Top + 90 Line2.Y2 = y0 - Shape1.Tag * Sin(pi * t/30) -Sqr(Line2.Tag^2 _ - (Shape1.Tag * Cos(pi * t / 30))^2) Line2.X1 = Line1.X2 Line2.Y1 = Line1.Y2 Shape4.Top = Line2.Y2 - 200 End Sub 9.2.4 与图形有关的属性 1.DrawMode属性 决定绘制线条的真实颜色 [对象.] DrawMode [=值] 2.DrawWidth属性和DrawStyle属性 DrawWidth属性用来设置绘图线的宽度 [对象.] DrawWidth [=值] DrawStyle属性用于指定用图形方式创建的线是实线还是虚线 [对象.] DrawStyle [=值] DrawWidth属性和DrawStyle属性设置对应的线宽和线型 3.FillColor属性和FillStyle属性 FillColor属性为填充色和FillStyle属性为填充样式 [对象.] FillColor [=值] [对象.] FillStyle [=值] 9.3 常用绘图方法 1.画点方法(PSet) 可以在对象的指定位置(x,y)，按确定的像素颜色画点 [对象.] Pset [Step] (x,y) [,颜色] 【例9-4】使用PSet方法绘制阿基米德螺线 2.画直线、矩形方法 画直线、矩形方法可以在对象上的两点之间画直线或矩形 对象.Line [Step] [x1,y1]-[Step](x2.y2) [,颜色] [,B[F]] 【例9-5】 使用Line方法的不同参数画出图形 3.画圆方法 可以在容器对象上画圆、椭圆或弧 [对象.] Circle [Step] (x,y),