lecture du fichier zip avec un progressbar
Bonsoir,
j'ai crée un programme Telecharger le fichier zip et extraire un fichier dans le fichier zip.
Voici une partie de mon code
Code:
1 2 3 4 5 6 7
| AddHandler wbclient.DownloadProgressChanged, AddressOf client_ProgressChanged
Dim data As Stream = Await wbclient.OpenReadTaskAsync(New Uri(URL))
Using archive As ZipArchive = New ZipArchive(data)
...etc
Private Sub client_ProgressChanged(sender As Object, e As DownloadProgressChangedEventArgs)
ProgressBar1.Value = e.ProgressPercentage
End Sub |
mon problème avec OpenReadTaskAsync, j'arrive pas avoir le chargement du fichier zip avec un progressbar1.value.
pouvez-vous m'aider comment faire avoir chargement du fichier zip avec un progressbar1?
Merci de votre réponse.