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
Raymond [mvp]
Bonsoir.
un exemple simple que tu rentreras tel quel sur un bouton :
Option Compare Database Option Explicit
Public Enum Prénoms Jean = 1 Paul = 2 Hervé = 3 Patrick = 4 Henri = 5 End Enum
Public Function LesPrénoms(Texte As Prénoms) As String MsgBox Texte End Function
Private Sub Commande22_Click() LesPrénoms Patrick End Sub dans cette sub lorsque tu feras un espace après LesPrénoms (ou une parenthèse) une liste des prénoms sera affichée.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jeff" a écrit dans le message de news:401966bc$0$24045$
voilà comment faire pour obtenir un menu comme quand ont déclare un Boolean
on obtient un menu True ou False.
je voudrait le même dans des appel de function...
merci de votre aide
Bonsoir.
un exemple simple que tu rentreras tel quel sur un bouton :
Option Compare Database
Option Explicit
Public Enum Prénoms
Jean = 1
Paul = 2
Hervé = 3
Patrick = 4
Henri = 5
End Enum
Public Function LesPrénoms(Texte As Prénoms) As String
MsgBox Texte
End Function
Private Sub Commande22_Click()
LesPrénoms Patrick
End Sub
dans cette sub lorsque tu feras un espace après LesPrénoms (ou une
parenthèse) une liste des prénoms sera affichée.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jeff" <mail@free.fr> a écrit dans le message de
news:401966bc$0$24045$626a54ce@news.free.fr...
voilà comment faire pour obtenir un menu comme quand ont déclare un
Boolean
un exemple simple que tu rentreras tel quel sur un bouton :
Option Compare Database Option Explicit
Public Enum Prénoms Jean = 1 Paul = 2 Hervé = 3 Patrick = 4 Henri = 5 End Enum
Public Function LesPrénoms(Texte As Prénoms) As String MsgBox Texte End Function
Private Sub Commande22_Click() LesPrénoms Patrick End Sub dans cette sub lorsque tu feras un espace après LesPrénoms (ou une parenthèse) une liste des prénoms sera affichée.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jeff" a écrit dans le message de news:401966bc$0$24045$
voilà comment faire pour obtenir un menu comme quand ont déclare un Boolean
on obtient un menu True ou False.
je voudrait le même dans des appel de function...
merci de votre aide
Jeff
ok j'esai ça cette aprés midi au boulot !!
merci
ps: ça marche enum sous access 97 ??
"Raymond [mvp]" a écrit dans le message de news:
Bonsoir.
un exemple simple que tu rentreras tel quel sur un bouton :
Option Compare Database Option Explicit
Public Enum Prénoms Jean = 1 Paul = 2 Hervé = 3 Patrick = 4 Henri = 5 End Enum
Public Function LesPrénoms(Texte As Prénoms) As String MsgBox Texte End Function
Private Sub Commande22_Click() LesPrénoms Patrick End Sub dans cette sub lorsque tu feras un espace après LesPrénoms (ou une parenthèse) une liste des prénoms sera affichée.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jeff" a écrit dans le message de news:401966bc$0$24045$
voilà comment faire pour obtenir un menu comme quand ont déclare un Boolean
on obtient un menu True ou False.
je voudrait le même dans des appel de function...
merci de votre aide
ok j'esai ça cette aprés midi au boulot !!
merci
ps: ça marche enum sous access 97 ??
"Raymond [mvp]" <XYZ.access.seneque@free.fr> a écrit dans le message de
news:ezleTbq5DHA.1368@TK2MSFTNGP10.phx.gbl...
Bonsoir.
un exemple simple que tu rentreras tel quel sur un bouton :
Option Compare Database
Option Explicit
Public Enum Prénoms
Jean = 1
Paul = 2
Hervé = 3
Patrick = 4
Henri = 5
End Enum
Public Function LesPrénoms(Texte As Prénoms) As String
MsgBox Texte
End Function
Private Sub Commande22_Click()
LesPrénoms Patrick
End Sub
dans cette sub lorsque tu feras un espace après LesPrénoms (ou une
parenthèse) une liste des prénoms sera affichée.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jeff" <mail@free.fr> a écrit dans le message de
news:401966bc$0$24045$626a54ce@news.free.fr...
voilà comment faire pour obtenir un menu comme quand ont déclare un
Boolean
un exemple simple que tu rentreras tel quel sur un bouton :
Option Compare Database Option Explicit
Public Enum Prénoms Jean = 1 Paul = 2 Hervé = 3 Patrick = 4 Henri = 5 End Enum
Public Function LesPrénoms(Texte As Prénoms) As String MsgBox Texte End Function
Private Sub Commande22_Click() LesPrénoms Patrick End Sub dans cette sub lorsque tu feras un espace après LesPrénoms (ou une parenthèse) une liste des prénoms sera affichée.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jeff" a écrit dans le message de news:401966bc$0$24045$
voilà comment faire pour obtenir un menu comme quand ont déclare un Boolean
on obtient un menu True ou False.
je voudrait le même dans des appel de function...
merci de votre aide
Raymond [mvp]
Perdu ! maintenant on joue avec ton fric.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jeff" a écrit dans le message de news:401a261b$0$29074$
ok j'esai ça cette aprés midi au boulot !!
merci
ps: ça marche enum sous access 97 ??
Perdu ! maintenant on joue avec ton fric.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jeff" <mail@free.fr> a écrit dans le message de
news:401a261b$0$29074$636a55ce@news.free.fr...
