Bonne année a tout le monde
J'ai besoin d'aide s'il vous plait

Je veux créer une interface pour installer plusieurs logiciels en même temp, en mode silent

Et je veux ajouter une progress bar pour voir l' avancement de chaque installation.

1 - le code pour installation des logiciels est OK, mais progressbar n'affiche rien.
ma question est :
Comment ajouter progressbar pour voir l'avancement de l'instalation de chaque logiciel ?
merci d'avance
voici mon Code

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
Public Class Form1 
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
        BackgroundWorker1.RunWorkerAsync() 
 
    End Sub 
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
        Control.CheckForIllegalCrossThreadCalls = False 
    End Sub 
 
    Private Sub BackgroundWorker1_DoWork(ByVal sender As System.Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork 
        Dim p As New Process 
        BackgroundWorker1.ReportProgress() 
        System.Threading.Thread.Sleep(100) 
        p.StartInfo.FileName = "cmd.exe" 
        p.StartInfo.Arguments = "/c start C:\Users\Computer\Desktop\vlc\vlc-2.2.1-win32.exe /S" 
        p.StartInfo.WindowStyle = ProcessWindowStyle.Hidden 
        p.Start() 
        System.Threading.Thread.Sleep(100) 
 
 
 
    End Sub 
 
    Private Sub BackgroundWorker1_ProgressChanged(ByVal sender As Object, ByVal e As System.ComponentModel.ProgressChangedEventArgs) Handles BackgroundWorker1.ProgressChanged 
        ProgressBar1.Value = e.ProgressPercentage 
 
    End Sub 
 
    Private Sub BackgroundWorker1_RunWorkerCompleted(ByVal sender As Object, ByVal e As System.ComponentModel.RunWorkerCompletedEventArgs) Handles BackgroundWorker1.RunWorkerCompleted 
 
        Label1.Text = "Success" 
    End Sub 
End Class