《visualbasic程序设计实用教程教学课件作者孙远光第八章》由会员分享，可在线阅读，更多相关《visualbasic程序设计实用教程教学课件作者孙远光第八章（100页珍藏版）》请在金锄头文库上搜索。
1、第8章 图形操作与多媒体,8.1 图形控件与操作 8.1.1 图片框控件和图像框控件 8.1.2 坐标系统与颜色 8.1.3 线条与形状控件 8.1.4 Pset、Line和Circle方法 8.2 多媒体控件与操作 8.2.1 VB的多媒体控件介绍 8.2.2 多媒体控件的常用事件及属性,下一页,返回,第8章 图形操作与多媒体,本章小结 上机实训,返回,上一页,8.1 图形控件与操作,8.1.1图片框控件和图像框控件 1.图片框控件 图片框(Picture)控件是一个完整的图形控件，不仅可用于显示多种格式的图片，也能支持VB中的各种绘图方法和Print方法，而且还能作为一个容器用于放置其他控
2、件。 图片框能够支持的图形文件格式有:位图文件(. bmp , . dib , . cur)、图标文件(. ico)、图元文件(. wmf)、增强型图元文件(. emf) , JPEG图形(.emf)或GIF图形(.gif)等。,下一页,返回,8.1 图形控件与操作,JPEG ( Joint Photographic Expert Group)是静止图形压缩算法的国际标准，采用有损压缩技术，压缩比可选择，支持灰度和真彩色图像。 GIF ( Graphic Interchange Format )是CompuServe公司推出的交错图形标准，采用无损压缩技术。其特点是:只要用一半的显示时间即可大
3、致看出图片的全貌，但最多支持256种颜色。 常用属性如下。 (1) Picture属性。与窗体的Picture属性大致相同，用于指定图片框中要加载的图片。 默认的属性值为NoThing(未加载图形文件)。,下一页,返回,上一页,8.1 图形控件与操作,在进行界面设计时可以修改其属性值，这时会弹出一个文件打开对话框，让用户选择要加载的图形文件，选择图形文件时应注意图片框所支持的文件格式。还可以利用剪贴板将图片复制粘贴到图片框中，操作方法是:先打开图形文件并将其复制到剪贴板中，再选中图片框控件，将剪贴板中的图形复制到图片框中。 在程序中也可以修改或删除图片框中的图片。例如: Picture1 .P
4、icture=NoThing 删除图片一框中的图片 Picture1 .Picture=Picture2. Picture 修改图片框中的图片 也可以用LoadPicture函数加载一新图片或删除图片框中的图片。例如:,下一页,返回,上一页,8.1 图形控件与操作,Picture1 .Picture= LoadPicture (“c:PHONE.gif”) 在图片框中加载新图片 Picture1 .Picture= LoadPicture()不带参数时表示删除图片框中的图片 可用SavePicture函数将加载到图片框中的图片及用绘图方法绘制的图形保存到一指定的文件中。例如: SavePict
5、ure Picture1 .Picture, ”D:TempTmp.Bmp” (2) AutoSize属性。用于选择是否自动调整图片框控件的大小以适应所加载的图片。,下一页,返回,上一页,8.1 图形控件与操作,默认的属性值为False(即图片框保持原始尺寸)。如果图片比图片框大，那么超出的部分不能显示出来，由于图片框不支持滚动条，未显示的部分用户将无法看到。利用滚动条控件的编程技术可以解决这一问题，在后面的编程实例中将看到这一点。 注意:若加载的是图元文件(.wmf) ,那么图形会自动调整大小来适应图片框的大小，若加载的是其他类型的文件，那么图形不会调整大小。 (3) Align属性。用于选
6、择图片框的对齐方式，可以使图片框依附在窗体上下左右任一边上，就像工具栏一样。还可使图片框的大小随窗体的大小的改变而改变。,下一页,返回,上一页,8.1 图形控件与操作,默认值为。0-None(自定义大小及位置)。可供选择的值还有: 1-Align Top(显示在窗体顶部) 2-Align Bottom(显示在窗体底部) 3-Align Left(显示在窗体左边缘) 4-Align Right(显示在窗全右边缘) 显示在窗体的顶部或底部时，图片框的宽度为窗体的ScaleWidth属性值，高度可自定义;显示在窗体的左、右边缘时，图片框的高度等于窗体的ScaleWidth属性值，宽度可自定义。,下一
7、页,返回,上一页,8.1 图形控件与操作,2.图像框控件 图像框(Image)控件是一个简化的图形控件。与图片框控件一样，可用于显示多种格式的图形文件，但不支持VB中的各种绘图方法和Print方法，也不能作为一个容器来放置其他控件。 加载图片时，与图片框不同的是，系统能自动调整图像框或图片的大小，使它们的大小总能保持一致。 常用属性如下,下一页,返回,上一页,8.1 图形控件与操作,(1) Picture属性。与图片框控件的Picture属性一样，用于指定图像框中要加载的图片。加载、删除或修改图片的方法也与图片框中所用的方法相同。 (2) Strecth属性。用于选择是否将加载的图片缩放到控件
8、本身的大小。 默认值为False(加载图片后，图片不缩放)。这时系统将自动调整控件的大小，以适应所显示的图片。 若将Strech属性值改为true(加载图片后，缩放图片)。这时控件的大小不变。 (3) Appearance属性、BorderStyle属性。用于选择控件的立体与边框外观。,下一页,返回,上一页,8.1 图形控件与操作,Appearance属性的默认值为0(平面外观)，若改为1，则为立体外观。 BorderStyle属性的默认值为0(无边框)，若改为1，则为单线固定边框。 可利用Image控件来代表一个按钮，用其外观代表按钮的状态。在Image控件的MouseDown事件中通过修改
9、属性，将外观设置为“立体单线”表示按钮按下;在MouseUp事件中将外观设置为“平面单线”表示按钮抬起。,下一页,返回,上一页,8.1 图形控件与操作,例8.1利用滚动条控件控制图片框中的超大图片的显示。 由于图片框控件Picture和图像框控件Image都没有滚动条属性，不支持滚动条。因此，要用滚动条来控件图片的显示，就要自己编程实现。 (1)界面设计与属性设置。 如图8. 1所示。在窗体上放置Picture1控件、HScroll1控件、VScroll1控件，并在Picture1控件中放置Image1控件，通过Image1控件的属性窗口中的Picture属性加载一张超大图片。 程序执行后的效
10、果如图8.2所示，可利用滚动条控制Image1中的图片在Picture1中移动。当窗体的大小改变时，图片框及滚动条的位置或大小会作相应的调整，以保持原界面风格。,下一页,返回,上一页,8.1 图形控件与操作,(2)代码编写。,下一页,返回,上一页,8.1 图形控件与操作,下一页,返回,上一页,8.1 图形控件与操作,下一页,返回,上一页,8.1 图形控件与操作,8.1.2 坐标系统与颜色 1.坐标系统 为了确定控件、图形或文字在容器(窗体或图片框)中的位置或大小，必须了解容器的坐标系统。任何容器都有一个默认的坐标系统，如图8.3所示:以容器的左上角为原点(0,0) , X轴方向向右为正，Y轴方
11、向向下为正，坐标单位(刻度)为堤(Twip)。容器的坐标系统的原点、方向和坐标单位可以通过修改刻度属性或使用Scale方法来改变，但一般使用默认的坐标系统。,下一页,返回,上一页,8.1 图形控件与操作,在程序设计时，特别是在进行图形设计时，往往需要改变VB的默认坐标系统，这时候可以通过改变ScaleMode, ScaleLeft、ScaleTop 、ScaleWidth、ScaleHeight属性来实现。 (1) ScaleMode属性。可通过设置容器的ScaleMode属性值来修改容器中的刻度。例如: frmDisplay . ScaleMode=6 将窗体的刻度设置为毫米 picDisp
12、lay . ScaleMode=VbPixels 将图片框的刻度设置为像索,下一页,返回,上一页,8.1 图形控件与操作,重新设置ScalcMode属性后，ScaleWidth和ScalcHcight属性值将自动重新定义，使之与新的刻度保持一致，而ScalcTop和ScalcLeft属性将自动设为0。 (2) ScaleLeft和ScalcTop属性。用于定义容器的左上角的坐标。例如: ScaleLeft=200 ScalcTop=200 将当前窗体的左上角坐标定义为(200,200) 当修改容器的ScaleLeft或ScaleTop属性时，容器的原点位置将改变，同时容器的ScaleMode属
13、性自动设为0，容器的坐标系的刻度也将改变。这时，若容器中放有其他控件，这些控件的位置不会改变，但系统将自动修改它们的位置属性Top或Left，使之与新的坐标系保持一致，见表8.1。,下一页,返回,上一页,8.1 图形控件与操作,设窗体From1位置属性Top和Left均为0(加载后窗体显示有屏幕的左上角)，Form1采用默认的坐标系(原点有窗体的左上角)。Form 1中放置有一图片框Picture1，它的位置属性Top = 500, Left = 1000, Picture1也采用默认的坐标系。若将窗体的ScaleLeft和ScaleTop属性都改为1000，图片框的位置不变，但位置属性Top
14、自动改为1500, Left改为2000。窗体将采用自定义坐标系统，而图片框仍采用默认的坐标系统。 读者若对ScaleLeft和ScaleTop属性的作用及其与Top和Left属性的区别还太大清楚，可上机修改这些属性，注意观察界面的变化。这些概念在绘图时非常重要。,下一页,返回,上一页,8.1 图形控件与操作,(3)ScaleWidth和ScaleHeight属性。用于定义相对单位。例如: 设窗体Form1. ScaleMode = 6(以毫米为单位)，图片框Picture1在窗体Form1中，Picture1. Width =100, Picture1. Height =50，表示图片框的实
15、际宽度100 mm ,高度为50 mm ,若设置Picture1. ScaleWidth = 1000 , Picture1. ScaleHeight=2000 ,则表示在Picture1中的水平单位为100/1000=0.1 mm，垂直单位为50/2000 =0. 025 mm。 若改变图片框Picture1的实际大小，Picture1中定义的相对单位不变，系统将自动调整Picture1的ScaleWidth和ScaleHeighl属性值。 若将ScaleWidth和ScaleHeight属性值设为负数，将改变坐标系的方向。当ScaleWidth的属性值为负时，表示X轴方向变为向左;当 Sc
16、aleHeight属性值为负时，表示Y轴方向变为向上。,下一页,返回,上一页,8.1 图形控件与操作,(4) Scale方法。用于改变坐标系。Scale方法的语法为: 对象名.Scale(x1,y1)-(x2,y2) 将容器的左上角坐标设为(x1,y1)，右下角坐标设为(x2,y2)。即容器的ScalcTop=x1，ScalcLeft=x2，ScalcWidth=x2-x1，ScalcHeigth=y2-y1。 若使用Scale方法时不带参数，表示将容器的坐标系恢复为默认的坐标系。 (5 ) CurrentX和CurrentY属性。用于设置或返回容器当前的坐标值。例如:,下一页,返回,上一页,8.1 图形控件与操作,当用户在Picture1中按下鼠标时，将鼠标按下的位置设为当前位置，并在当前位置输出当前坐标。 2.设置颜色 (1) RGB函数。可用于设置任何颜色。RGB函数的语法为: RGD(red,green,blue) 参数red , green , blue分别表示红，绿，蓝的分量值。三个分量的取值范围都是0255。例如: Picture
