Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access MsgBox

MsgBox

3 réponses
Avatar
didier
Bonjour

Je veux cr=E9er un boite message simple comme la fonction=20
en Macro BoiteMsg en VB
Donc j'ai cr=E9=E9 sur un bouton de controle
If [ctrl]=3Dnull then
MsgBox("...." VbOKonly)
mais il attend une =E9galit=E9 sur la boite msgbox du genre=20
Vb=3DOk donc j'ai mis=20
If [ctrl]=3Dnull then
If MsgBox("...." VbOKonly)=3DVbOK then
Mais je veut juste retourner =E0 mon formulaire pour que=20
l'utilisateur remplisse le champs ctrl
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Eric
"didier" écrivait news:1d31a01c453a8
$d0fb5580$:

Bonjour

Je veux créer un boite message simple comme la fonction
en Macro BoiteMsg en VB
Donc j'ai créé sur un bouton de controle
If [ctrl]=null then
MsgBox("...." VbOKonly)
mais il attend une égalité sur la boite msgbox du genre
Vb=Ok donc j'ai mis
If [ctrl]=null then
If MsgBox("...." VbOKonly)=VbOK then
Mais je veut juste retourner à mon formulaire pour que
l'utilisateur remplisse le champs ctrl



Bonjour Didier,

If IsNull([ctrl]) then
MsgBox "Champ à renseigner"
Exit Sub
Else
...
End If

Avec un éventuel retour sur le champ à remplir par un
ChampARemplir.SetFocus avant le Exit Sub
(La MsgBox affichera que le bouton OK.)

PS: il ya 2 manières d'utiliser la MsgBox : soit affichage d'un msg soit
récupération de la valeur du bouton cliqué. Voir l'aide

A+
Eric

Avatar
Jessy Sempere [MVP]
Bonjour

Il attend une égalité parceque tu utilises les parenthèses...

Essais plutôt :

If..... then
msgbox "...", VbOkOnly
enf if

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"didier" a écrit dans le message news:
1d31a01c453a8$d0fb5580$
Bonjour

Je veux créer un boite message simple comme la fonction
en Macro BoiteMsg en VB
Donc j'ai créé sur un bouton de controle
If [ctrl]=null then
MsgBox("...." VbOKonly)
mais il attend une égalité sur la boite msgbox du genre
Vb=Ok donc j'ai mis
If [ctrl]=null then
If MsgBox("...." VbOKonly)=VbOK then
Mais je veut juste retourner à mon formulaire pour que
l'utilisateur remplisse le champs ctrl
Avatar
Pierre CFI [mvp]
oui
msgbox "bonjour" suffit, le vbokonly étant mis automatiquement

--
Pierre CFI qui met son grain de sel
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Jessy Sempere [MVP]" a écrit dans le message de news:capju7$3hg$
Bonjour

Il attend une égalité parceque tu utilises les parenthèses...

Essais plutôt :

If..... then
msgbox "...", VbOkOnly
enf if

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"didier" a écrit dans le message news:
1d31a01c453a8$d0fb5580$
Bonjour

Je veux créer un boite message simple comme la fonction
en Macro BoiteMsg en VB
Donc j'ai créé sur un bouton de controle
If [ctrl]=null then
MsgBox("...." VbOKonly)
mais il attend une égalité sur la boite msgbox du genre
Vb=Ok donc j'ai mis
If [ctrl]=null then
If MsgBox("...." VbOKonly)=VbOK then
Mais je veut juste retourner à mon formulaire pour que
l'utilisateur remplisse le champs ctrl