Bonjour a tous/toutes,

me voila aujourd'hui encore confronte a un leger probleme. Je souhaite tester la valeur "Checked" d'un Checkbox a l'interieur d'une Function. Cette Function est execute dans un BackgroundWorker :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Private Sub MyBgW_DoWork(ByVal sender...
Dim N As Integer
For N = 1 to TOTAL Step + 1
MaFunction(N)
Next N
End Sub
 
 
Public Function MaFunction(ByRef N As Integer)
If MonCheckBox.Checked = True Then
...
End If
Voila c'est tout simple, le soucis c'est que la valeur de MonCheckBox est toujours a False dans la Function.
Voici le resultat des tests:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub MyBgW_DoWork(ByVal sender...
MsgBox(MonCheckBox.Checked.ToString) '<------- renvoie "True"
Dim N As Integer
For N = 1 to TOTAL Step + 1
MaFunction(N)
Next N
End Sub
 
 
Public Function MaFunction(ByRef N As Integer)
MsgBox(MonCheckBox.Checked.ToString) '<------- renvoie "False"
If MonCheckBox.Checked = True Then
...
End If

Je me demande donc comment passer le status de MonCheckedBox dans la Function. Si vous avez des idees, n'hesitez pas

Merci d'avance et a bientot!