ProgressBar VB.NET

[Geovanny0401]

bueno amigos gracias por la informacion, estuve buscando ejemplos con el BackgroundWorker

aca le muestro el codigo como lo implemente en mi aplicativo pero me genera un error.

Código:

   Private Sub bwProgress_DoWork(ByVal sender As System.Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles bwProgress.DoWork
        For i As Integer = 1 To 100
            'Realiza una tarea
            System.Threading.Thread.Sleep(100)
            bwProgress.ReportProgress(i)
            If (bwProgress.CancellationPending) Then
                Return
            End If
        Next
    End Sub
    Private Sub bwProgress_ProgressChanged(ByVal sender As Object, ByVal e As System.ComponentModel.ProgressChangedEventArgs) Handles bwProgress.ProgressChanged
        Try
            'Notificar el progreso de la tarea
            ProgressBar1.Value = e.ProgressPercentage
           lblInfo.Text = e.ProgressPercentage+"%"
         Catch ex As Exception
            MsgBox("Error" & ex.Message)
        End Try
        
    End Sub

    Private Sub bwProgress_RunWorkerCompleted(ByVal sender As Object, ByVal e As System.ComponentModel.RunWorkerCompletedEventArgs) Handles bwProgress.RunWorkerCompleted
        'Realizamos las operaciones que haya que realizar al terminar el progreso
        lblInfo.Text = "Tarea terminada"
        cmdCerrar.Enabled = True
        Button1.Enabled = True
        ProgressBar1.Value = 0
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        'Iniciamos el trabajo
        If (Not bwProgress.IsBusy) Then
            bwProgress.RunWorkerAsync()
            cmdCerrar.Enabled = True
            Button1.Enabled = False
        End If
    End Sub

donde esta de color rojo el programa me genera un error "La conversión de la cadena "%" en el tipo 'Double' no es válida." no entiendo ese error

Código HTML:

 lblInfo.Text = e.ProgressPercentage+"%"

espero de su gran ayuda en este codigo