Office中国论坛/Access中国论坛 › Access中国门户旧版 ›Access› 模块类函数VBA › 查看内容

API改变主窗口背景

1970-1-1 08:00| 发布者: 未知| 查看: 1737| 评论: 0

Private Sub cmdChangeImage_Click()

1、GetFileDialog模块，是一个通用的用API实现的文件存取对话框，非常有价值
调用方式：
ap_GetFileDialog(访问方式, 默认文件名, 对话框标题, 文件类型)

访问方式：  True ---- 读取文件    False ---- 写入文件
默认文件名：指定对话框打开时，文件名文本框的文件名
对话框标题：指定对话框的标题
文件类型：  指定选取的文件的类型（扩展名）

返回包含路径的文件名

例如：
strPath = ap_GetFileDialog(True, "LOGO.BMP", "选择指定的图片", _
            "位图文件 (*.bmp)" & Chr(0) & "*.bmp" & Chr(0) _
            & "JPEG 文件 (*.jpg)" & Chr(0) & "*.jpg" & Chr(0) _
            & "GIF 文件 (*.gif)" & Chr(0) & "*.gif" & Chr(0))
选取类型为.bmp .jpg .gif的文件

2、CMDIWindow类
支持三种文件：.bmp .jpg .gif
DrawMode属性：1 - 平铺  2 - 居中  3 - 左上角  4 - 右下角  5 - 拉伸

但是通过程序验证，平铺、左上角、右下角没什么问题；居中，小图片没问题，大图片时变成了左下角；拉伸，是从左下角开始的。不知道各位网友的测试如何。

收藏分享邀请

帐号		自动登录	找回密码
密码			注册

API改变主窗口背景

最新评论

相关分类