- 7
- 0
- 约7.21千字
- 约 61页
- 2016-10-26 发布于广东
- 举报
第 11 章 图 形 操 作 VB提供了强大的图形功能,可以直接画点、直线、矩形、正方形、圆、椭圆等,并由这些基本元素组成各种图形。 在VB中进行绘图操作有3个途径,一是利用图形控件,二是利用图形方法,三是利用API调用。本章介绍前两种方法。 11.1 图 形 控 件 VB提供的用于画图的图形控件有直线控件(Line)和形状控件(Shape)。用图形控件画图无需编写代码,只需在设计阶段在需要画图的地方拖动鼠标即可。 11.1.1 直线控件(Line) 直线控件用于画直线。操作步骤如下。 (1)单击工具箱中的Line图标。 (2)移动到画线的起始位置。 (3)按下鼠标左键拖拉到直线的终点,松开鼠标左键。 直线控件的常用属性如下。 1.BorderStyle属性 BorderStyle属性用于设置直线的类型,共有7种类型。 2.BorderWidth属性 BorderWidth属性用于设置线的粗细。 3.BorderColor属性 BorderColor属性用于设置颜色。 4.X1,Y1和X2,Y2属性 这些属性用于控制线的两个端点的位置。 11.1.2 形状控件(Shape) 形状控件可以用来画矩形、正方形、圆、椭圆、圆角矩形以及圆角正方形。 画某一形状的图形的步骤如下。 (1)单击工具箱中的Shape图标。 (2)在窗体内将鼠标移到要画图形的左上角位置。 (3)按下鼠标左键拖拉到要画图形结束处的右下角。 (4)松开鼠标左键,屏幕上出现一个矩形。 为矩形设置不同的Shape属性,可以得到不同的形状。 形状控件的常用属性如下。 1.Shape属性 Shape属性确定图形的类型,一共有6种类型。 2.Borderstyle属性 Borderstyle属性用于设置边框线型。 3.Fillstyle属性和FillsColor属性 Fillstyle属性确定以什么样的样式来填充图形。如果Fillstyle的值不为1(缺省值是1),可以用FillsColor属性来确定所填充的线条的颜色,缺省值是0(黑色)。 11.2 VB坐标系 11.2.1 坐标系 为描述对象在载体上的位置,VB规定了坐标系。如图11-2所示,窗体上除标题栏和窗体边框以外的可供使用的区域成为工作区。在工作区内,系统默认的窗体坐标系的原点在工作区内的左上角,水平向右为x轴,垂直向下为y轴。 VB中可以在其上绘图的对象除窗体外还有图片框。图片框坐标系的原点在图片框的左上角,水平向右为x轴,垂直向下为y轴。显然,它的原点位置和y轴方向都不同于数学中的直角坐标系。 11.2.2 坐标单位 系统默认的坐标单位是Twip(缇)。1Twip=1/20点=1/1440英寸=1/567厘米。用户也可以通过对容器ScaleMode?属性的重新设置更改坐标单位。 ScaleMode?属性有8种选择,即可以设定8种坐标单位。 ScaleMode?属性既可以在属性窗口中设置,也可以在程序代码中设置,用程序代码设置ScaleMode?属性的格式如下: 对象名. ScaleMode=属性值 例如,语句form1. ScaleMode=6,表示窗体坐标系的坐标单位是毫米。 语句Picture1. ScaleMode=1,表示窗体中的图片框Picture1坐标系的坐标单位是Twip?。 11.2.3 自定义坐标系 系统规定的坐标系难以表示负值坐标,为此用户可用自定义坐标系来解决。 通过容器对象的ScaleTop,ScaleLeft,ScaleWidth和ScaleHeight 4个属性可以改变容器的坐标系,其方法如下。 1.重定义坐标原点 属性ScaleTop,ScaleLeft的值用于控制容器对象的左上角坐标,所有容器对象的ScaleTop,ScaleLeft属性的缺省值都是0,坐标原点(0,0)在容器对象的左上角。 Heigh和Width属性所代表的是窗体的实际大小,包括了标题栏这类无法任意改变大小的部分。真正可以控制的显示区域(工作区),它的高度和宽度分别记录在ScaleHeigh和ScaleWidth这两个属性中,如图11-3所示。 例如,在设计阶段定义窗体Form1的坐标属性如下: Form1.
您可能关注的文档
- 新UML与系统分析设计 第二版 教学课件 张龙祥 uml011.ppt
- 新UML与系统分析设计 第二版 教学课件 张龙祥 uml012.ppt
- 新UML与系统分析设计 第二版 教学课件 张龙祥 uml013.ppt
- 新Unigraphics NX3应用与实例教程 教学课件 郑金 14104 第5章.ppt
- 新Unigraphics NX3应用与实例教程 教学课件 郑金 14104 第10章.ppt
- 新Unigraphics NX3应用与实例教程 教学课件 郑金 14104 第11章.ppt
- 新Unigraphics NX3应用与实例教程 教学课件 郑金 1_ 14104 第1章.ppt
- 新Unigraphics NX3应用与实例教程 教学课件 郑金 1_ 14104 第2章.ppt
- 新Unigraphics NX3应用与实例教程 教学课件 郑金 1_ 14104 第3章.ppt
- 新Unigraphics NX3应用与实例教程 教学课件 郑金 1_ 14104 第4章.ppt
- 小区绿化施工协议书.docx
- 墙面施工协议书.docx
- 1 古诗二首(课件)--2025-2026学年统编版语文二年级下册.pptx
- (2026春新版)部编版八年级道德与法治下册《3.1《公民基本权利》PPT课件.pptx
- (2026春新版)部编版八年级道德与法治下册《4.3《依法履行义务》PPT课件.pptx
- (2026春新版)部编版八年级道德与法治下册《6.2《按劳分配为主体、多种分配方式并存》PPT课件.pptx
- (2026春新版)部编版八年级道德与法治下册《6.1《公有制为主体、多种所有制经济共同发展》PPT课件.pptx
- 初三教学管理交流发言稿.docx
- 小学生课外阅读总结.docx
- 餐饮门店夜经济运营的社会责任报告(夜间贡献)撰写流程试题库及答案.doc
原创力文档

文档评论(0)