For i = 0 To SBPossible.ListCount - 1
valeurpossible = SBPossible.ItemData(i)
For j = 0 To SBUtilisé.ListCount - 1
valeurutilisé = SBUtilisé.ItemData(j)
Do While valeurpossible <> valeurutilisé
j = j + 1
valeurutilisé = SBUtilisé.ItemData(j)
Loop
If valeurutilisé = Null Then
SBLibre.AddItem (valeurpossible)
Else
Exit For
End If
Next
Next
SBUtilisé,SBLibre et SBPossible sont des listes d'un formulaire de la base de données access.
Quand je lance mon programme, le test valeurutilisé=null n'est pas pris en compte. en effet quand la boucle "do while" s'effectue et que la valeur de valeurutilisé=null, le programme va directement dans la boucle else.
Je ne sais pas comment faire pour résoudre cette erreur.
non en fait si la valeurutilisé est égale a null alors j'ajoute une valeur à la liste sinon je sors du premier for pour changer ma valeur de "valeurpossible"
si "valeurutilisé"est égale à null alors ça veut dire que "valeurpossible" n'apparait pas dans la liste SBUtilisé.