下载器不工作

Question

Imports system.net
Public Class Form1

    Private Sub cmdsave_Click(sender As Object, e As EventArgs) Handles cmdsave.Click
        SaveFileDialog.Filter = "All files (*.*)|*.*"
        ''"EXE (*.exe) |*.exe |JPEG (*.jpg)|*.jpg | MP3 (*.mp3)|*.mp3 | WAV (*.wav) |*.wav ";
        SaveFileDialog.ShowDialog()
        TextBox2.Text = SaveFileDialog.FileName
    End Sub
    Public WithEvents download As WebClient
    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        download = New WebClient
        download.DownloadFileAsync(New Uri(TextBox1.Text), TextBox2.Text)
    End Sub
    Private Sub download_DownloadProgressChanged(sender As Object, e As DownloadProgressChangedEventArgs) Handles download.DownloadProgressChanged
        ProgressBar1.Value = e.ProgressPercentage
    End Sub
End Class

我正在尝试制作一个下载器，但我总是在 SaveFileDialog 区域遇到错误。我是 VB.Net 的新手，我想知道我需要更改什么才能使其正常工作并成功下载所有类型的文件。

Answer 1

除非您已将 SaveFileDialog 声明为 SaveFileDialog，否则我相信您的错误与非共享成员有关。不过，这不会导致您的错误。

一个建议说要删除网络客户端并将其重新添加到您的表单中。

此外，一个快速（肮脏的？）修复是在您的应用程序属性下针对较低版本的 .Net Framework。

其中任何一个都可以解决这个问题。

下载器不工作

Downloader not working

vb.net

coding-style

webclient

savefiledialog