Access中的FileDialog为用户自定义类型？

chenkai_c

在窗体中的按钮上定义了下面的代码：

Private Sub Command1_Click() -------------------------------（1）
Dim dlgSaveAs As FileDialog
Set dlgSaveAs = Application.FileDialog( _
    FileDialogType:=msoFileDialogSaveAs)
dlgSaveAs.Show
End Sub
单击按钮以后就直接停在（1）处，出错说：用户定义类型未定义，不知道怎么解决，我用的access2003,系统是windowsxp!我是菜鸟，请高手帮帮忙！！

LucasLynn

以下是引用chenkai_c在2006-5-20 12:39:00的发言：


在窗体中的按钮上定义了下面的代码：

Private Sub Command1_Click() -------------------------------（1）
Dim dlgSaveAs As FileDialog
Set dlgSaveAs = Application.FileDialog(msoFileDialogSaveAs)
dlgSaveAs.Show
End Sub
单击按钮以后就直接停在（1）处，出错说：用户定义类型未定义，不知道怎么解决，我用的access2003,系统是windowsxp!我是菜鸟，请高手帮帮忙！！

  


添加对Office 2003对象库的引用即可。

[此贴子已经被作者于2006-5-20 15:15:03编辑过]

chenkai_c

谢谢！问题解决了！