Discussion :

[stargates]

Bonjour,


comment lier un progressbar avec un thread

Au départ j'affiche un splashscreen pendant 5 secondes dont voici le 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
Imports System.Threading

PrivateSub frmClient_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesMyBase.Load
Me.Hide()
Dim frmSplash As New frmSplash
frmSplash.Show()
frmSplash.Update()
Thread.Sleep(5000)
frmSplash.Close()
Me.Show()
 
EndSub

J'ai ajouté une progressbar sur frmSplash comment la lié au thread?


Merci

[Biloutor]

Il me semble qu'il faudrait utiliser un BackGroundWorder à la place d'un Thread classique c'est fait pour ca.
A partir de ce BGW tu as une methode WorkerReportProgress , et un evenement Progresse Changed.
J'ai deja trouver un tuto la dessus sur ce site il me semble alors en cherchant du coté du backGroundWorker tu trouvera ton bonheur.

Bonne chance

[stargates]

bonjour,

suite au conseil de biloutor, j'ai effectué ceci

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
 
Imports System.Threading
Private Sub frmClient_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 
        Me.Hide()
        BackgroundWorker1.RunWorkerAsync()
        Dim frmsplash As New frmSplash
        frmsplash.Show()
        While (BackgroundWorker1.IsBusy)
           Application.DoEvents()
        End While
        frmsplash.Close()
        Me.Show()
 
 End Sub
Private Sub BackgroundWorker1_DoWork(ByVal sender As System.Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork
        Thread.Sleep(5000)
    End Sub

voilà, ca fonctionne