[VB] problème de condition dans un if

Résolu/Fermé
chti_moon Messages postés 63 Date d'inscription vendredi 6 juillet 2007 Statut Membre Dernière intervention 29 octobre 2008 - 22 juil. 2008 à 14:35
vince190 Messages postés 687 Date d'inscription mardi 9 août 2005 Statut Membre Dernière intervention 19 février 2010 - 22 juil. 2008 à 15:23
Bonjour,

Une petite question à propos d'un if en VB.

Alors voilà le contaxte, das un formulaire, l'utilisateur aura à entrer différentes choses dont un numéro de plan et/ou une désignation.
Voilà le code que j'ai écrit lors du clic sur le bouton de validation :

If Texte5 = "" And Texte7 = "" Then
MsgBox ("Vous devez entrer un numéro de plan et/ou une ddésignation")
Else
DoCmd.GoToRecord, ,acNewRec
End If

Mais même si mais 2 champs Texte sont vide, je peux valider mon enregistrement.
Pourquoi ?

Merci
A voir également:

6 réponses

chti_moon Messages postés 63 Date d'inscription vendredi 6 juillet 2007 Statut Membre Dernière intervention 29 octobre 2008 4
22 juil. 2008 à 15:18
J'ai donc pris le problème dans l'autre sens : voici la solution :

If Texte5 <> Null And Texte7 <> Null Then
DoCmd.GoToRecord, ,acNewRec
Else
MsgBox ("Vous devez entrer un numéro de plan et/ou une ddésignation")
End If

Voilà !
Merci
2
vince190 Messages postés 687 Date d'inscription mardi 9 août 2005 Statut Membre Dernière intervention 19 février 2010 78
22 juil. 2008 à 14:39
A la place de mettre "" à chaque fois tu devrais faire un truc du genre:
if textbox5 = NULL And Textbox7 = NULL then
....


Le reste à l'air correct.
0
chti_moon Messages postés 63 Date d'inscription vendredi 6 juillet 2007 Statut Membre Dernière intervention 29 octobre 2008 4
22 juil. 2008 à 14:52
Ca ne marche pas non plus avec "= Null".
J'ai aussi essayé :
if Not Texte5 And Not Texte7 Then
...

Dans ce cas, ça fonctionne mais uniquement si je rentre des chiffres, sinon j'ai un incompatibilité de types.
Hors moi j'ai besoin des lettres aussi
0
vince190 Messages postés 687 Date d'inscription mardi 9 août 2005 Statut Membre Dernière intervention 19 février 2010 78
22 juil. 2008 à 14:55
Sinon tu peux prendre le pb à l'envers. Je veux dire tu peux mettre dans le sens:
if textbox5 NOT NULL then (ce que tu veux)

Je sais pas si tu vois...
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
MrSlave Messages postés 2587 Date d'inscription lundi 28 avril 2008 Statut Membre Dernière intervention 26 août 2011 146
22 juil. 2008 à 15:10
Essaye ça :

If Text5 = "" Then
       sup = MsgBox("Veuillez remplir le champ 5 :", vbCritical + vbOKOnly + 0, "Champ 5")
    Exit Sub
End If
0
vince190 Messages postés 687 Date d'inscription mardi 9 août 2005 Statut Membre Dernière intervention 19 février 2010 78
22 juil. 2008 à 15:23
Niquel donc un nouveau problème résolu à plusieurs! C'est beau les forums!
0