Choix multiple vbs
Fermé
pivot85150
Messages postés
294
Date d'inscription
vendredi 15 mai 2009
Statut
Membre
Dernière intervention
9 janvier 2011
-
30 mai 2009 à 11:49
Peio - 15 juin 2009 à 09:56
Peio - 15 juin 2009 à 09:56
A voir également:
- Choix multiple vbs
- Liste déroulante choix multiple excel - Guide
- Vbs windows - Guide
- Presse papier multiple - Guide
- Paris multiple 2/6 explication ✓ - Forum Loisirs / Divertissements
- Ecran multiple pc - Guide
4 réponses
Si il faut que tu fasse une Msgbox :
Voila pas plus compliqué
'Msgbox ("Messge affiché", type oui/non, "Titre de la box rep = Msgbox ("Salut est-ce que ça va ?", vbYesNo, "Bienvenue") If (rep = vbYes) then Msgbox "Ah ba tant mieux" else Msgbox "Ah bon, ba pourquoi ça va pas ?" end If
Voila pas plus compliqué
Pour pouvoir le réaffiché il faut que tu construire un String ("chaine de caractères" en anglais).
Pour ce utiliser la fontion vbs : CStr(expression) *. Cette fonction permet de passer d'une expression à une chaine.
En somme pour réafficher le texte rentré par l'utilisateur il faut ce code :
J'espère t'avoir été utile :-)
Pour ce utiliser la fontion vbs : CStr(expression) *. Cette fonction permet de passer d'une expression à une chaine.
En somme pour réafficher le texte rentré par l'utilisateur il faut ce code :
Dim rep, aff rep = InputBox ("entre qq chose" , "qq chose" , "") aff = CStr(rep) MsgBox aff
J'espère t'avoir été utile :-)
pivot85150
Messages postés
294
Date d'inscription
vendredi 15 mai 2009
Statut
Membre
Dernière intervention
9 janvier 2011
35
14 juin 2009 à 20:48
14 juin 2009 à 20:48
oui j'ai essayé cela donne un bon rendu mais j'ai chercher sur le web et je n'ai pas trouvé la reponse a mon autre question :
comment faire pour que l'utilisateur rentre un texte et qu'il le resorte aprés
voila le code que j'ai essayé :
rep = InputBox ("entre qq chose" , "qq chose" , "")
MsgBox "%rep"
mais voila cela ne marche pas pourriez vous m'eclaircir s'il vous plait
merci
comment faire pour que l'utilisateur rentre un texte et qu'il le resorte aprés
voila le code que j'ai essayé :
rep = InputBox ("entre qq chose" , "qq chose" , "")
MsgBox "%rep"
mais voila cela ne marche pas pourriez vous m'eclaircir s'il vous plait
merci
pivot85150
Messages postés
294
Date d'inscription
vendredi 15 mai 2009
Statut
Membre
Dernière intervention
9 janvier 2011
35
30 mai 2009 à 20:08
30 mai 2009 à 20:08
personne