Question

vb中另存为对话框的使用问题。请帮忙。

我在窗体上画了一个command按钮，另外在和这个工程同一目录下有一个.rar文件存在，我希望做一个这样的窗体：当我点击command按钮时，会弹出一个另存为对话框，这个对话框是用来保存那个.rar文件用的。将来我把这个工程打包成exe文件后，当运行这个程序，就可以通过这个按钮“下载”那个.rar文件了。哪位高手帮帮忙吧。谢谢了。

Answer 1

虽然描述得有点乱，但基本上明白意思了。

在窗体上放一个CommonDialog控件

Private Sub Command1_Click()
CommonDialog1.DefaultExt = "rar"
CommonDialog1.Filter "RAR文件|*.rar"
CommonDialog1.ShowSave
If CommonDialog1.FileName <> "" Then
FileCopy App.Path & "\abc.rar", CommonDialog1.FileName
MsgBox "文件已另存为" & CommonDialog1.FileName
End If
End Sub

Answer 2

你的这个做法------我在窗体上画了一个command按钮，另外在和这个工程同一目录下有一个.rar文件存在，我希望做一个这样的窗体：当我点击command按钮时，会弹出一个另存为对话框，这个对话框是用来保存那个.rar文件用的。-------不就是覆盖原来的文件吗？
。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。
既然上面提到的按钮是个“保存”按钮，将来我把这个工程打包成exe文件后，当运行这个程序，就可以通过这个按钮“下载”那个.rar文件了。------------这里怎么又变成“下载”了。往哪 下载，干什么用？是打开它？----你是想操作文件吗？

Answer 3

没法帮你，这怎么个下载法啊？