有关FileDialog对象的问题

网络蜘蛛

这是书中的代码：
Sub SaveDiglog()
  Dim dlgSaveAs  As FileDialog
  
  Set dlgSaveAs = Application.FileDialog(msoFileDialogSaveAs)
  dlgSaveAs.Show
  MsgBox dlgSaveAs.SelectedItems(1)
End Sub
请问用这个对话框保存的是什么？当前数据库？我输入了文件名也没看到保存了什么，点取消还会出错，请问有没有对这个控件的详细介绍？

tmtony

这个是显示文件对话框,可获得保存的文件名, 你可取得这个文件名,作你自己的保存用途

roych

这里只是获取一个保存路径而已。需要保存的话，还要根据实际来处理。例如：
1、在Excel中，可以用SaveAs方法，然后用这个指定路径来保存
2、在TransferSpreadsheet导出查询或者表时，同样可以用这个路径来导出。
关于这个对象，本论坛里有相应的例子。我曾在《 【源码开放】季度奖管理系统》中的导出数据模块中也用过。

网络蜘蛛

是这样啊！明白了。多谢。