VB中另存为对话框的使用
我要导入导出数据库文件，在到处的时候使用另存为对话框，具体代码是如何实现的？我直接用commondialog1.showsave之后点另存为没有响应，是不是要添加什么代码？急！
另存为什么格式的文件你需要告诉大家,写到不同类型的文件中用到的代码不一样
另存为MDB，比如，我导入数据库的代码如下：
VB code:
On Error Resume Next
CommonDialog1.Filter = "Access (*.mdb)|*.mdb|All files (*.*)|*.*"
CommonDialog1.FilterIndex = 1
CommonDialog1.CancelError = True
CommonDialog1.ShowOpen
If Err.Number = 32755 Then '对话框单击 取消 的处理
Err.Clear
Exit Sub
End If
fn = CommonDialog1.FileName
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;" & _
"Data Source=" & CommonDialog1.FileName
Adodc1.CursorLocation = adUseClient
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "select * from admin" 'admin换成你库中有的表名
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1
现在需要另存为的代码
commondialog1.showsave跟commondialog1.showOpen一样，它只给你返回路径和文件名，具体的打开或保存操作，都是要你自己写代码来完成的。
从commondialog1.filename 属性中得到路径和文件名。
最好是别用adodc控件,改�
相关问答：
为什么C写的DLL文件C、PB能调用VB不能调用？
VB里为什么有的DLL直接通过引用可以使用？有的需要通过declare申明外部函数？这些DLL有什么差别？
1、为什么PB能通过DECLARE声明而VB不行？
2、如果这个dll中的 ......
一个窗体，3个datagrid，共计3个表，一个表对应一个datagrid，点击datagrid1(打开该窗体时已经被赋值)，根据datagrid1中的某个值，查询表2和表3，并把符合条件的分别赋值给datagrid2和datagrid3，要怎么写
VB ......
用vb做好的软件，想要加入自动隐藏的功能，在那添加啊，还有隐藏的代码那有啊 借用一下 谢了
方法1
Private Sub Form_Load()
Me.Height = 1 * Screen.TwipsPerPixelY
Me ......
