modifier "Entrer une valeur de paramétre"

Le
le Nordiste
Bonjour à tous,

Dans une requête il est possible de saisir une variable à la demande :
[nomVar].
Est il possible de changer le texte "Entrer une valeur de paramétre"
qui apparait dans la bande bleu supérieure du MsgBox ?

Merci de votre aide.
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
P3859
Le #23176581
Le 04/03/2011 08:59, le Nordiste a écrit :
Bonjour à tous,

Dans une requête il est possible de saisir une variable à la demande :
[nomVar].
Est il possible de changer le texte "Entrer une valeur de paramétre"
qui apparait dans la bande bleu supérieure du MsgBox ?

Merci de votre aide.




j'ai trouvé

Vous devez dans un premier temps écrire une nouvelle fonction d'affichage de boite de message (MessageBox) :


Function FormattedMsgBox( _
Prompt As String, _
Optional Buttons As VbMsgBoxStyle = vbOKOnly, _
Optional Title As String = vbNullString, _
Optional HelpFile As Variant, _
Optional Context As Variant) _
As VbMsgBoxResult
If IsMissing(HelpFile) Or IsMissing(Context) Then
FormattedMsgBox = Eval("MsgBox(""" & Prompt & _
""", " & Buttons & ", """ & Title & """)")
Else
FormattedMsgBox = Eval("MsgBox(""" & Prompt & _
""", " & Buttons & ", """ & Title & """, """ & _
HelpFile & """, " & Context & ")")
End If
End Function

Ensuite il ne vous reste qu'à appeler cette fonction depuis votre code :


FormattedMsgBox "Wrong button!@This button doesn't Another.", _
vbOKOnly + vbExclamation, "My Application"


ici : http://access.developpez.com/faq/?page=Interface

il y a aussi

http://arkham46.developpez.com/articles/office/msgboxplus/doc/

et ici

bon courage
Publicité
Poster une réponse
Anonyme