如何使用FolderBrowserDialog设置下载位置

Question

我正在尝试使用FolderBrowserDialog来选择要下载文件的位置。这是用于选择文件夹的代码。

Private Sub Button15_Click(sender As Object, e As EventArgs) Handles Button15.Click
    If (FolderBrowserDialog1.ShowDialog() = DialogResult.OK) Then
        TextBox1.Text = FolderBrowserDialog1.SelectedPath
    End If
End Sub

现在我只需要知道如何获取出现在文本框中的目录，并将文件下载到那里。以下是下载的代码。

My.Computer.Network.DownloadFile("http://download1516.mediafire.com/wtzr4h1b37zg/ptzcffq933e87c8/sword_custom.png", "C:\Users\Administrator")

我需要用什么替换"C:\Users\Administrator“？

Answer 1

Private Sub Button15_Click(sender As Object, e As EventArgs) Handles Button15.Click
    Dim URL As String = "http://download1516.mediafire.com/wtzr4h1b37zg/ptzcffq933e87c8/sword_custom.png"
    Dim SaveFile As String = "sword_custom.png"

    With FolderBrowserDialog1
        If .ShowDialog = DialogResult.OK Then
            TextBox1.Text = .SelectedPath
            My.Computer.Network.DownloadFile(URL, IO.Path.Combine(.SelectedPath, SaveFile))
        End If
    End With
End Sub