OVH Cloud OVH Cloud

VBA : ISnull

3 réponses
Avatar
belok
Bonjour,


J'ai un problème :

J'ai créé un formulaire pour modifier les données de deux table, j'ai donc
créé une requête et tous a l'air de fonctionner parfaitement.

Mon problème quand je clique sur le bouton "bmodifier", je voudrais qu'il
vérifie des rêgles avant de pouvoir fermer le formulaire.

les rêgle sont les suivantes :

-égalité de deux champs pour le pass (ok)
-aucun champs ne peut être vide (marche pas)


Private Sub bmodifier_Click()
If arepassword = apassword Then 'vérification du
pass (c'est ok)
If champ = IsNull Then
MsgBox "le champs peut pas être vide"
End If
DoCmd.Close acForm, "modif_connexion"
DoCmd.OpenForm "connect"
Else
MsgBox "pass correspond pas"
End If
End Sub

j'ai 6 champs avec le meme regle je peux les grouper ou je dois faire chaque
fois un if ?

Isnull fonctionne pas pourquoi ?


merci pour votre aide,

3 réponses

Avatar
Guy DETIENNE
Salut ;O)

Fais plutôt ainsi:

If IsNull(champ) Then

au lieu de

If champ = IsNull Then

Tchao

Guy

--
__________________________________
Tchao.net: L'informatique à votre dimension
www.tchao.net
Pour toute réponse, retirer le .nospam de l'adresse mail
ou cliquez ici http://cerbermail.com/?6nQ9U2fpkD

"belok" a écrit dans le message de
news:3f9e9c96$0$16222$

Bonjour,


J'ai un problème :

J'ai créé un formulaire pour modifier les données de deux table, j'ai donc
créé une requête et tous a l'air de fonctionner parfaitement.

Mon problème quand je clique sur le bouton "bmodifier", je voudrais qu'il
vérifie des rêgles avant de pouvoir fermer le formulaire.

les rêgle sont les suivantes :

-égalité de deux champs pour le pass (ok)
-aucun champs ne peut être vide (marche pas)


Private Sub bmodifier_Click()
If arepassword = apassword Then 'vérification du
pass (c'est ok)
If champ = IsNull Then
MsgBox "le champs peut pas être vide"
End If
DoCmd.Close acForm, "modif_connexion"
DoCmd.OpenForm "connect"
Else
MsgBox "pass correspond pas"
End If
End Sub

j'ai 6 champs avec le meme regle je peux les grouper ou je dois faire
chaque

fois un if ?

Isnull fonctionne pas pourquoi ?


merci pour votre aide,




Avatar
3stone
Salut,

| If champ = IsNull Then


If IsNull([LeChamp]) Then



--
A+
Pierre (3stone) Access MVP
-------------------------------------------------------
Bien démarrer ? c'est ici http://users.skynet.be/mpfa/
( Je ne réponds pas aux emails qui concernent Access )
-------------------------------------------------------
Avatar
belok
merci ça fonctionne





"belok" a écrit dans le message de
news:3f9e9c96$0$16222$

Bonjour,


J'ai un problème :

J'ai créé un formulaire pour modifier les données de deux table, j'ai donc
créé une requête et tous a l'air de fonctionner parfaitement.

Mon problème quand je clique sur le bouton "bmodifier", je voudrais qu'il
vérifie des rêgles avant de pouvoir fermer le formulaire.

les rêgle sont les suivantes :

-égalité de deux champs pour le pass (ok)
-aucun champs ne peut être vide (marche pas)


Private Sub bmodifier_Click()
If arepassword = apassword Then 'vérification du
pass (c'est ok)
If champ = IsNull Then
MsgBox "le champs peut pas être vide"
End If
DoCmd.Close acForm, "modif_connexion"
DoCmd.OpenForm "connect"
Else
MsgBox "pass correspond pas"
End If
End Sub

j'ai 6 champs avec le meme regle je peux les grouper ou je dois faire
chaque

fois un if ?

Isnull fonctionne pas pourquoi ?


merci pour votre aide,