Discussion :

[Shennong]

Bonjour,

Dans mon application, le temps qu'une requête SQL remplisse mon dataset, j'affiche un form dans un autre thread avec un message d'attente contenant un label et un gif dans une picturebox.

Je construis et appelle le thread de cette façon :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Dim th As System.Threading.Thread = New Threading.Thread(AddressOf Task_A)
th.SetApartmentState(ApartmentState.STA)
th.Start()

La procédure Task_A est codée comme suit :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 Public Sub Task_A()
        Dim message = New Waiting
        Application.Run(message)
    End Sub

Mais parfois, je rencontre l'erreur suivante :



Je ne comprends pas ce message d'erreur. Quelqu'un pourrait-il m'aider svp ?

Merci d'avance.

Cordialement-

[Shennong]

J'ai oublié de préciser que "Waiting" est le nom du form que j'appelle dans mon nouveau thread.

Merci.

[Shennong]

Fallait juste ajouter une petite ligne au Sub :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Public Sub Task_A()
   Waiting.PictureBox1.Image = My.Resources.WAIT
   Dim message = New Waiting
   Application.Run(message)
End Sub

L'erreur n'apparaît plus.