Saisie inputbox vers msgbox [Résolu]

developvbdebut 476 Messages postés samedi 14 août 2004Date d'inscription 2 juin 2012 Dernière intervention - 20 août 2004 à 09:28 - Dernière réponse : cs_ITALIA 2169 Messages postés vendredi 20 avril 2001Date d'inscription 30 juin 2009 Dernière intervention
- 23 août 2004 à 12:12
Bonjour tout le monde!

J'ai réalisé une saisie d'information avec inputbox, la réponse de la saisie apparaitra dans le msgbox.

Voicie le code ci-dessous.

Dim Prenom

Prenom = InputBox("Entree votre Prénom", "Démarage ", "")
If Prenom = "" Then

MsgBox "Domage"

Else

MsgBox "Bienvenue ", vbExclamation & Prenom

End If

Je souhaiterais savoir comment faire apparaitre le point d'exclamation dans le msgbox, j'ai réalisé ce code mais il marque erreur de compilation.

Mercie de votre aide.

A bientôt
Afficher la suite 

6 réponses

Meilleure réponse
cs_ITALIA 2169 Messages postés vendredi 20 avril 2001Date d'inscription 30 juin 2009 Dernière intervention - 23 août 2004 à 12:12
3
Merci
coches reponses acceptées ...MERCI

It@li@

Merci cs_ITALIA 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 68 internautes ce mois-ci

MoiOlivier 172 Messages postés mardi 15 juillet 2003Date d'inscription 4 août 2005 Dernière intervention - 20 août 2004 à 09:39
0
Merci
Salut,

...
else
MsgBox "bienvenue " & Prenom, vbExclamation
end if

@+
RicoNuch 140 Messages postés mercredi 18 juin 2003Date d'inscription 16 décembre 2006 Dernière intervention - 20 août 2004 à 09:41
0
Merci
Hello...

Essaye ça :

(...)
If Prenom = "" Then

MsgBox "Dommage ! "

Else

MsgBox "Bienvenue, " & Prenom & " !", vbExclamation

End If

RicoNuch
cs_ITALIA 2169 Messages postés vendredi 20 avril 2001Date d'inscription 30 juin 2009 Dernière intervention - 20 août 2004 à 09:43
0
Merci
Dommage prend 2 "m"

vbCritical ou 16 .............Affiche l'icône Message critique.
vbQuestion ou 32......... Affiche l'icône Demande d'avertissement.
vbExclamation ou........... 48 Affiche l'icône Message d'avertissement.
vbInformation ou 64 ........Affiche l'icône Message d'information.

Dim Prenom

Prenom = InputBox("Entree votre Prénom", "Démarage ", "")
If Prenom = "" Then
Reponse = MsgBox("Dommage", , "Message")
Else
Reponse = MsgBox("Bienvenue " & Prenom, vbExclamation, "Message")
End If

It@li@
cs_rene38 1858 Messages postés samedi 29 juin 2002Date d'inscription 17 octobre 2013 Dernière intervention - 20 août 2004 à 11:42
0
Merci
pendant qu'on y est :
Prenom = InputBox("Entrez votre Prénom", "Démarrage ", "")
developvbdebut 476 Messages postés samedi 14 août 2004Date d'inscription 2 juin 2012 Dernière intervention - 20 août 2004 à 20:46
0
Merci
Bonsoir

Ca fonctionne.

Mercie de votre aide.

A bientôt

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.