用vb写文件菜单的“保存”和“另存为”的代码有什么不一样呢?

这是我以前写记事本程序时的保存和另存为的代码，你看下就明白了：

Private Sub mnusave_Click() '保存
Set fs = CreateObject("Scripting.FileSystemObject")
CommonDialog1.InitDir = "c:\"
CommonDialog1.Filter = "文本文件|*.txt"
If fs.fileexists(FileName) = False Then
CommonDialog1.ShowSave
End If
FileName = CommonDialog1.FileName
RichTextBox1.SaveFile FileName, rtfText
Me.Caption = "Easy Notebook -" & FileName
End Sub

Private Sub mnuanother_Click() '另存为
CommonDialog1.InitDir = "c:\"
CommonDialog1.Filter = "文本文件|*.txt"
CommonDialog1.ShowSave
FileName = CommonDialog1.FileName
RichTextBox1.SaveFile FileName, rtfText
Me.Caption = "Easy Notebook -" & FileName
End Sub

其中FileName是一个Public变量

保存：是直接存盘。
另存为：要显示一个选择存放路径和文件名的对话框，并返回存放的文件名（含路径）

保存：就是保存到默认目录
另存为：可以自己选位置
就这么简单

你没有过系统的记事本啊，这个都不懂 “I 服了 YOU "