Ecel VBA编程 图像分析和总结.docxVIP

Excel VBA 编程 图像 在 VBA 中，可用图像控件将图片作为数据的一部分显示在窗体中。例如，可用图像控件在人事管理窗体中显示员工的照片。可用图像控件来裁剪、调整大小或缩放图片，但不能 编辑图片的内容。其中，图像控件常用属性如下： Picture属性 通过 Picture属性的设置可以确定图像控件引入的图片名称。在设置该属性时，可以在 【属性】窗口，也可以在代码中直接设置，即利用LoadPicture函数来设置。格式： object.Picture = LoadPicture(pathname) 其中，pathname 为图片文件的路径。例如，在窗体中添加一个图像控件，将D 盘下的a.bmp 图片显示到窗体中。 图 图片控件 Private Sub CommandButton1_Click() Image1.Picture = LoadPicture(d:\a.bmp) Private Sub CommandButton1_Click() Image1.Picture = LoadPicture(d:\a.bmp) End Sub 如果需要删除图像控件中的图片时，在 LoadPicture函数中不指定图片路径即可。并且如果窗体中一个图像控件的图片可以直接加载到另一个图像控件中，不需要再指定图片的路径。 PictureAlignmen属t 性 指定载入图片的位置，其属性值为如表表13-9所示。 表表 13-9 图像控件的位置 常量 常量 fmPictureAlignmentTopLeft fmPictureAlignmentTopRight fmPictureAlignmentCenter fmPictureAlignmentBottomLeft fmPictureAlignmentBottomRight 属性值 0 1 2 3 4 说明 在左上角。 正在右上角。位于中心 在左下角。 在右下角。 PictureSizeMode属性 指定在显示图片的方式，其属性值包括如表13-10所示。 表 13-10 显示图片的方式 常量 常量 fmPictureSizeModeClip fmPictureSizeModeStretch 属性值 0 1 fmPictureSizeModeZoom 3 说明 裁掉图片中比窗体或页面大的部分（默认）。 扩展图片使其填满窗体或页面。该设置值使图片在垂直和水平方向都发生变形。 放大图片，但图片在水平和垂直方向上都不变形。 PictureTili属ng性 是否平铺控件中的图片，其属性值是 Tru（e SpecialEffe属ct性 表示图片平铺）和 Fals（e 表示不平铺图片）。 指定图像控件的外观，其属性值包括如表13-11所示。 表 13-11 图像控件外观样式 常量 常量 fmSpecialEffectFlat 属性值 0 fmSpecialEffectRaised 1 fmSpecialEffectSunken 2 fmSpecialEffectEtched fmSpecialEffectBump 3 6 说明 对象显示为平面的，借助于边框、颜色的变化或二者的共同变化，与周围的窗体相区别。该值为图像和标签的默认值；对所有控件均有效。 对象的上边和左边高亮，下边和右边具有阴影。对复选框或选项按钮无效。 对象的上边和左边具有阴影，下边和右边高亮。控件及其边框显示为刻入所在的窗体。复选框和选项按钮的默认值；对所有控件有效（默认）。 边框显示为沿着控件边缘被雕刻。对复选框和选项按钮无效。 对象下边和右边隆起，而上边和左边显示为平面的。对复选框或选项按钮无效。 图像控件在一般程序中主要用来显示图片，但图像控件也支持很多事件，常用的 图像控件在一般程序中主要用来显示图片，但图像控件也支持很多事件，常用的 为单击 Click事件，可响应用户单击图片的操作 提 示