Vb.net Visual Basic窗体。如何让用户将文本文件保存到所需的位置

现在，我有一个编码，可以在当前目录中保存一个文本文件。但是，我希望为用户提供一个浏览按钮，以便他们可以选择此文本文件的保存位置。我该怎么做

---

我自己尝试过，但在使用“保存文件”对话框时遇到了问题。如果你能教我如何使用保存文件对话框或无论如何写保存浏览按钮，我将非常感谢

该对象的文档包含一个。

下面是一个教程，介绍如何使用Visual Studio中的工具箱实现SaveFileDialog，如您所述。代码示例是C语言的，但是可以很容易地转换为VB

链接：

---

你遇到了什么麻烦。具体一点。我在工具箱上找到了一个保存文件对话框工具，并试图将它与按钮结合起来，但它不起作用。我基本上不知道如何开始这个过程。“它不起作用”——具体地说。从这个例子中，这是什么意思“写流的代码就在这里？”？我应该写IO.File.writeAllines（Stream，Result1.Lines）吗？不要使用

myStream

，而是使用

IO.File.writeAllines（saveFileDialog1.FileName，Result1.Lines）

。我试过了，但它说另一个进程正在使用它，这对我来说毫无意义。我无论如何都不使用这个文本文件。它只会在我指定的位置生成一个空白的txt文件。如果saveFileDialog1.ShowDialog（）=DialogResult.OK，那么myStream=saveFileDialog1.OpenFile（）（myStream不是空的），然后是IO.File.writeAllines（saveFileDialog1.FileName，Result1.Lines），正如我所说的，您不需要任何

myStream

代码。行

myStream=saveFileDialog1.OpenFile（）

导致错误消息-当

writeAllines

方法尝试使用该文件时，该文件已打开。是的，消息显示“另一个”进程，但它的意思是它试图打开文件，但无法打开。

Private Sub Button7_Click(sender As Object, e As EventArgs) Handles Button7.Click
    Dim CurrentDir As String = Environment.CurrentDirectory
    Dim OutputFile2 As String = IO.Path.Combine(CurrentDir, "input.txt")
    IO.File.WriteAllLines(OutputFile2, Result1.Lines)
End Sub

Private Sub button1_Click(sender As Object, e As EventArgs)
    ' When user clicks button, show the dialog.
    saveFileDialog1.ShowDialog()
End Sub

Private Sub saveFileDialog1_FileOk(sender As Object, e As CancelEventArgs)
    ' Get file name.
    Dim name As String = saveFileDialog1.FileName
    ' Write to the file name selected.
    ' ... You can write the text from a TextBox instead of a string literal.
    File.WriteAllText(name, "test")
End Sub