Visual Basic程序设计基础 模块8 图形与图像设计 课件.pptxVIP

模块8 图形与图像设计 目录8.1绘制图形8.2显示图片8.3与绘图有关的常用属性和事件 知识目标熟悉基本图形的种类和绘图方法。掌握图片在窗体中的显示方法。技能目标能够运用图形绘制控件完成基本图形的绘制。能够运用与绘图有关的属性和事件完成简单场景的制作。 8.1 绘制图形 8.1 绘制图形在VB中，绘制图形的方法有如下两种：使用图形控件，如Line控件、Shape控件；使用绘图方法，如Line方法、Circle方法等。使用绘图控件无须编写代码，但它提供的绘图样式选择性有限，只能实现简单功能。要实现更高级的功能，还必须采用更高级的方法。 ?8.1.1 图形控件形状（Shape）控件和直线（Line）控件可用来在窗体上画图形元素。这些控件不支持任何事件，只用于表面装饰，可在设计时通过设置其属性确定显示某种图形，也可以在程序运行时修改属性以动态地显示图形。8.1 绘制图形1.Shape控件（1）Shape控件预定义了6种形状，见表8-1，通过设置Shape属性值，可绘制出需要的形状。 8.1 绘制图形 图8-1所示为用Shape控件画出的图形，Shape属性值分别为0~5。8.1 绘制图形图8-1 用Shape控件画出的图形 （2）用Shape控件画出的图形还可以调整大小，设置颜色、边框样式、边框宽度等。Shape控件的常用属性见表8-2。8.1 绘制图形 【例8-1】 设计窗体的初始状态如图8-2所示，在程序运行时单击“设置形状”按钮可改变图形的形状，单击“设置颜色”按钮可以改变图形的颜色，单击“设置填充”按钮可以改变图形的填充方式。程序运行结果如图8-3~图8-5所示。8.1 绘制图形图8-2 初始状态图8-3 设置图形的形状 8.1 绘制图形图8-4 设置图形的颜色图8-5 设置图形的填充方式 程序代码如下：Private Sub Command1_Click（）Dim I As IntegerFor I=0 To 5Shape1（I）.Shape=I ?将控件数组中第I个控件的形状属性改为INextEnd SubPrivate Sub Command2_Click（）Dim I As IntegerFor I=0 To 5Shape1（I）.BackStyle=1 ?将控件的背景类型更改为“覆盖”8.1 绘制图形 Shape1（I）.BackColor=QBColor（I） ?更改控件的背景颜色NextEnd SubPrivate Sub Command3_Click（）Dim I As IntegerFor I=0 To 5Shape1（I）.FillColor=RGB（255，255，255 ?将控件的填充颜色改为白色Shape1（I）.FillStyle=I+2NextEnd Sub8.1 绘制图形 8.1 绘制图形2.Line控件Line控件用于在对象上画一条直线，通过设置各种属性和方法来改变它的外观。Line控件常用的属性如下：（1）BorderWidth：该属性用于调节窗体中直线的粗细。（2）BorderStyle：该属性用于设置直线的线型，如实线、虚线或点划线等。该属性只有在BorderWidth值为1时有效。（3）BorderColor：该属性用于设置直线的颜色。（4）Visible：该属性用于根据程序的需要显示或隐藏直线。 ?8.1.2 常用的绘图方法8.1 绘制图形1.画点方法在VisualBasic中可以使用Pset方法在指定对象的指定位置使用指定的颜色画一个点。其语法格式如下： [对象.]Pset[Step]（x，y）[，颜色]其中，参数（x，y）为所画点的坐标，关键字Step表示采用当前作图位置的相对值，采用背景颜色可清除某个位置上的点。 8.1 绘制图形例如，要在窗体上坐标为（200，300）的位置画出一个红色的点，使用的命令为 Form1.Pset（200，300），RGB（255，0，0）在Visual Basic中可以使用对象的DrawWidth属性设置所画点的大小。使用Pset方法可画出任意曲线。提示 8.1 绘制图形2.画直线和矩形的方法如果用户用绘制单个点的方式绘图，图形程序就会变得耗费时间而不实用，因此，除了线与形状控件外，VB还提供了丰富的图形工具，允许用户使用单一语句绘制线条、矩形、圆、椭圆等几何图形。Line方法用于画直线或矩形，其语法格式如下： [对象.]Line[[Step]（x1，y1）]-（x2，y2）[，颜色][，B[F]]该语句是将两个点的坐标连成一条直线或矩形，用所提供的颜色设置成线的颜色或矩形的颜色。 8.1 绘制图形其中各参数的含义如下：