Ce code est presque trivial, mais pourtant il ne fonctionne pas. J'explique: remarque est une string que je reprend de mon formulaire, je teste si elle est null et dans l'affirmative, j'affiche msgbox. Autrement, je peut supprimer ce qu'elle contient et la rendre null.

Le problème, c'est que quand Me.RemarqueClient est = Null, il passe au Else

nb: j'ai vérifié dans le debuggeur, ma chaine Me.RemarqueClient et par conséquent "remarque" sont bien nulles !!!!!!!

Ou est le problème?


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
  Dim remarque As String
 
    remarque = Me.RemarqueClient
 
    If Not remarque = Null Then
        Me.RemarqueClient = Null
        Me.Requery
    Else
        MsgBox ("il n'y a pas de remarque à supprimer")
    End If