Procédure avec paramètres

Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Entraide Applications Microsoft Office Access Procédure avec paramètres

3 réponses

Winguy

04/05/2006 à 22:44

Bonjour,

Message("[Prenom]")

Je veux utiliser la procédure Message avec comme paramètre un nom de champ.
Comment utiliser le champ par la suite. Ceci doit être simple mais j'ai de
la difficulté à utiliser le nom du champ du paramètre. Voici un exemple :

Private Sub Message(Champ As String)
Msgbox(Champ) ' Ceci ne fonctionne pas Pourquoi ???
End sub

3 réponses

Eric

04/05/2006 à 23:02

Bonsoir,
je ne suis pas sur d'avoir bien compris.

Un formulaire basé sur une table/requête avec un bouton de commande.

Sur clic du bouton:
Private Sub Commande0_Click()
Dim f As Field
Set f = Me.Recordset.Fields(0) '1er champ du recordset
Message f
End Sub

Private Sub Message(Champ As Field)
MsgBox (Champ.Name) ' affiche le nom du champ
' on peut afficher d'autres infos, sa valeur, ....
End Sub

C'était ça ?

Bonjour,

Message("[Prenom]")

Je veux utiliser la procédure Message avec comme paramètre un nom de champ.
Comment utiliser le champ par la suite. Ceci doit être simple mais j'ai de
la difficulté à utiliser le nom du champ du paramètre. Voici un exemple :

Private Sub Message(Champ As String)
Msgbox(Champ) ' Ceci ne fonctionne pas Pourquoi ???
End sub

--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Eric

04/05/2006 à 23:04

.../...
Manque la ligne
Set f = Nothing
avant le End Sub de la procédure Commande0_Click()

Bonjour,

Message("[Prenom]")

Je veux utiliser la procédure Message avec comme paramètre un nom de champ.
Comment utiliser le champ par la suite. Ceci doit être simple mais j'ai de
la difficulté à utiliser le nom du champ du paramètre. Voici un exemple :

Private Sub Message(Champ As String)
Msgbox(Champ) ' Ceci ne fonctionne pas Pourquoi ???
End sub

--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

J-Pierre

05/05/2006 à 01:27

Bonjour,

Sur le plan de la syntaxe, tu devrais coder:

Private Sub Message(Champ As String)
Msgbox Champ
End sub

Mais je ne vois pas l'intérêt de faire ça, peux-tu expliquer ton problème plus clairement ?

J-Pierre

"Winguy" a écrit dans le message de news:

Bonjour,

Message("[Prenom]")

Je veux utiliser la procédure Message avec comme paramètre un nom de champ.
Comment utiliser le champ par la suite. Ceci doit être simple mais j'ai de
la difficulté à utiliser le nom du champ du paramètre. Voici un exemple :

Private Sub Message(Champ As String)
Msgbox(Champ) ' Ceci ne fonctionne pas Pourquoi ???
End sub

Procédure avec paramètres

3 réponses

Veuillez sélectionner un problème