《VisualBasic》课件18-沈阳职业技术学院、看.pptx

沈阳职业技术学院教案用纸第 9 周教学班级：总第 18 次 学时 2课程：VB 授课教师：邢小杰

VB 6.0程序设计VB程序设计上节回顾MDI是Windows应用程序的典型结构，利用MDI可以创建在一个窗体中包含多个窗体的应用程序，可以同时显示多个文档。了解并掌握MDI的特点及其应用方法，对于程序设计者来说是至关重要的。新课导入：VisualBasic提供了四种图形控件：直线（Line）控件、形状（Shape）控件、图片框(PictureBox)控件和图像框(Image)控件。

第8章VB的图形设计之图形控件直线（Line）控件Line控件在工具箱中的图标是 ，用于在窗体、图片框和框架中画各种直线段。该控件既可以在设计时通过设置线的端点坐标属性来画出直线，也可以在程序运行时动态地改变直线的各种属性。BorderStyle属性该属性用来设置线条的类型。2．BorderWidth属性该属性用来设置线条的宽度，即线条的粗细，其取值范围为1~8192。注意：由于点划线的线宽不能大于一个像素。因此，对于属性值为2~4的Line控件，如果设置BorderWidth属性值大于1，则其表现形式会同实心线一样。3．DrawMode属性该属性用来设置绘图的颜色模式。VB程序设计

是2.形状（Shape）控件Shape控件在工具箱中的图标 ，它预定义了6种形状：矩形、正方形、椭圆形、圆形、圆角矩形和圆角正方形。当Shape控件拖放到窗体时显示为一个矩形，通过Shape属性可确定所需要的几何形状。可以调整这些形状的大小，可以设置其颜色、边框样式、边框宽度等。1．Shape属性该属性用来设置其显示形状。2．FillStyle属性该属性用来设置填充效果。VB程序设计

15MIN测试执行的水准范围从最低到最高，包含十分广泛。生产线工人照用例表敲键盘或点菜单用脑去思考。。。3.图形控件的使用在VisualBasic中，图片通常显示在三处位置：窗体、PictureBox控件和Image控件上。使用LoadPicture函数指定一个文件名，并将该图片赋值给Picture属性。使用LoadResPicture函数可把工程中.res文件的图片赋值给Picture属性。例如：Image1.Picture=LoadPicture(“”)该语句将名为Image1的图像框内的图片删除掉。VB程序设计

15MIN测试执行的水准范围从最低到最高，包含十分广泛。生产线工人照用例表敲键盘或点菜单用脑去思考。。。第8章VB的图形设计之基本绘图方法构成一个坐标系，需要三个要素：坐标原点、坐标度量单位、坐标轴的长度与方向。坐标轴定义位置的数值称为刻度，坐标系的每个轴都有自己的刻度。坐标轴的方向、起点和坐标系的刻度都是可以改变的。（0,0）.(x,y)VB程序设计Windows常用的坐标系

15MIN测试执行的水准范围从最低到最高，包含十分广泛。生产线工人照用例表敲键盘或点菜单用脑去思考。。。用窗体内两个命令按钮的单击事件，来说明用Scale方法改变坐标系统后产生的影响，命令Line（x1,x2）-（y1,y2）表示从坐标(x1,x2)到（y1,y2）画一根直线。PrivateSubCommand1_Click()ClsVB程序设计’采用缺省坐标系Form1.ScaleLine(0,0)-(1000,1000)EndSub’定义用户坐标系PrivateSubCommand2_Click()ClsForm1.Scale(0,1000)-(1000,0)Line(0,0)-(1000,1000)EndSub

15MIN测试执行的水准范围从最低到最高，包含十分广泛。生产线工人照用例表敲键盘或点菜单用脑去思考。。。缺省坐标系VB程序设计定义用户坐标系Scale方法是建立用户坐标系最方便有效的方法。格式：[对象．]Scale[(xLeft，yTop)-(xRight，yBotton)]Form1.Scale(0,2000)-(1000,0)（1000,2000）（0,0）

10MIN·休息一会!VB程序设计

15MIN测试执行的水准范围从最低到最高，包含十分广泛。生产线工人照用例表敲键盘或点菜单用脑去思考。。。运用VisualBasic中的颜色设计实例：在窗体中画出一系列不同颜色的直线。VisualBasic的绘图方法清除图形方法（Cls） 格式:[对象.]Cls用指定颜色画点方法(PSet)PSet方法在指定位置用指定颜色画点。格式:[对象.]Pset[Step](x,y)[,color]3.画线和矩形的方法(Line)格式:[对象名.]Line[[Step](Xl,Yl)]-[Step](X2,Y2)