Office中国论坛/Access中国论坛

标题: 请问我的文件打开对话框错在哪里? [打印本页]

作者: yhcs 时间: 2008-3-25 15:15
标题: 请问我的文件打开对话框错在哪里?
先引用了microsoft　office 12.0 object library
然后在按钮的事件函数下写:
Private Sub btn1_Click()

Dim dlgOpen As FileDialog

Set dlgOpen = Application.FileDialog(msoFileDialogFilePicker)
dlgOpen.Filters.Clear
dlgOpen.Filters.Add "Images", "*.Bmp" //这里出错
dlgOpen.AllowMultiSelect = True
dlgOpen.Show

End Sub

运行时总是说"对象不支持该属性或方法"(错误语句处),我网上查到的自定义文件类型都是这样写的,请问为什么会是错的呢?

作者: yhcs 时间: 2008-3-25 15:36
在线等,谢谢!

[ 本帖最后由 yhcs 于 2008-3-25 15:57 编辑 ]

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)