[VB6] Problème de If

Bonjour à tous,

J'ai un petit problème de If.

Voici le code :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

With rstAvoir .ActiveConnection = connexion .CursorType = adOpenStatic .LockType = adLockOptimistic .Open "Select Code_MC From Avoir where (Code_Equipe= " & Feuille_Démarrage.Nom_Equipe.ItemData(Feuille_Démarrage.Nom_Equipe.ListIndex) & ") and (Code_Vacation=" & Feuille_Démarrage.Libellé_Vac.ItemData(Feuille_Démarrage.Libellé_Vac.ListIndex) & ") and (Numero_Agent=" & Feuille_Démarrage.Nom_Ctq_Ou_Adjoint.ItemData(Feuille_Démarrage.Nom_Ctq_Ou_Adjoint.ListIndex) & ") and (Date_Vacation=#" & Feuille_Démarrage.Label9.Caption & "#)"   If !Code_MC = Null Then MsgBox ("Code_MC null") Else MsgBox ("Code MC n'est pas null") End If .Close End With

---

Par exemple dans ma table avoir, J'ai :
Code_Equipe = 1
Code_Vacation = 2
Numero_Agent = 1414
Date_Vacation = 31/01/2006
Code_MC = Null

Lorsque je fais le Si, normalement il doit me mettre le message suivant : "Code_MC Null". Et ben non je n'ai pas ce message la j'ai celui-ci : "Code_MC n'est pas null".

Je n'arrive pas à trouver mon erreur.

Pouvez-vous m'aider?

Merci d'avance.

En VBA j'ai IsNull ou empty, pas Null tout court...
A tout hasard

A+

Bonjour

Code:

---

1 2	if isnull(!code_mc) then

---

Ok?

Pierre Fauconnier

Edit => Coiffé par Ouskel'n'or

:merci: Pierre,

Avec IsNull devant !Code_MC ça marche impect.

Merci Encore à tout le monde.