begin process at 2012 02 14 08:18:34
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > Forum > 

Archive Visual Basic & VB.NET

 > 

Archives Visual Basic

 > 

J'AI BESOIN D'AIDE !!!! :)

 > 

ifthenelse

Derniers messages déposésPoser une question dans le forum ou lancer une discussion

ifthenelse

vendredi 25 octobre 2002 à 10:47:33 | ifthenelse

vroumm
J'ai une question tres simple.
Je ne comprend pas pourquoi lors de l'exécution le message suivant s'affiche: "Erreur de compilation: Else sans If"
Voila le code:
If Option1.Value = True Then quoi = InputBox("Quoi?")

ElseIf Option2.Value = True Then que = InputBox("quoi")

ElseIf Option3.Value = True Then qui = InputBox("quoi?")

End If

Merci
vendredi 25 octobre 2002 à 11:06:26 | Re : ifthenelse

tex
Il faut mettre :

If Option1.Value = True Then quoi = InputBox("Quoi?")

If Option2.Value = True Then que = InputBox("quoi")

If Option3.Value = True Then qui = InputBox("quoi?")

Et normalement ça marche. Tiens moi au courant.

@+ tex




-------------------------------
Réponse au message :
-------------------------------

J'ai une question tres simple.
Je ne comprend pas pourquoi lors de l'exécution le message suivant s'affiche: "Erreur de compilation: Else sans If"
Voila le code:
If Option1.Value = True Then quoi = InputBox("Quoi?")

ElseIf Option2.Value = True Then que = InputBox("quoi")

ElseIf Option3.Value = True Then qui = InputBox("quoi?")

End If

Merci
vendredi 25 octobre 2002 à 11:07:55 | Re : ifthenelse

BasicInstinct

Membre Club
tres simple :
c'est parce que tu ecris a la suite de ton Then

faut ecrire :
If Option1.Value = True Then
quoi = InputBox("Quoi?")
Else
If Option2.Value = True Then
que = InputBox("quoi")
Else
If Option3.Value = True Then
qui = InputBox("quoi?")
End If
End If
End If




-------------------------------
Réponse au message :
-------------------------------

J'ai une question tres simple.
Je ne comprend pas pourquoi lors de l'exécution le message suivant s'affiche: "Erreur de compilation: Else sans If"
Voila le code:
If Option1.Value = True Then quoi = InputBox("Quoi?")

ElseIf Option2.Value = True Then que = InputBox("quoi")

ElseIf Option3.Value = True Then qui = InputBox("quoi?")

End If

Merci
vendredi 25 octobre 2002 à 11:10:00 | Re : ifthenelse

acive
salut, éssaye:
if option1.value = true then
quoi = ...
else
if option2.value = true then
que = ...
else
if option3.value = true then qui = ...
end if
end if




-------------------------------
Réponse au message :
-------------------------------

J'ai une question tres simple.
Je ne comprend pas pourquoi lors de l'exécution le message suivant s'affiche: "Erreur de compilation: Else sans If"
Voila le code:
If Option1.Value = True Then quoi = InputBox("Quoi?")

ElseIf Option2.Value = True Then que = InputBox("quoi")

ElseIf Option3.Value = True Then qui = InputBox("quoi?")

End If

Merci
vendredi 25 octobre 2002 à 11:17:26 | Re : ifthenelse

sara132

sara132


-------------------------------
Réponse au message :
-------------------------------

If Option1.Value = True Then
quoi = InputBox("Quoi?") 'à la ligne

ElseIf Option2.Value = True Then que = InputBox("quoi")

ElsIf Option3.Value = True Then qui = InputBox("quoi?")


end if

et ça marche
vendredi 25 octobre 2002 à 11:28:54 | Re : ifthenelse

vroumm
Merci bien
ça marche aussi
car ce que m'a dit basicinstinct marche bien aussi
flo


-------------------------------
Réponse au message :
-------------------------------

Il faut mettre :

If Option1.Value = True Then quoi = InputBox("Quoi?")

If Option2.Value = True Then que = InputBox("quoi")

If Option3.Value = True Then qui = InputBox("quoi?")

Et normalement ça marche. Tiens moi au courant.

@+ tex




-------------------------------
Réponse au message :
-------------------------------

J'ai une question tres simple.
Je ne comprend pas pourquoi lors de l'exécution le message suivant s'affiche: "Erreur de compilation: Else sans If"
Voila le code:
If Option1.Value = True Then quoi = InputBox("Quoi?")

ElseIf Option2.Value = True Then que = InputBox("quoi")

ElseIf Option3.Value = True Then qui = InputBox("quoi?")

End If

Merci
vendredi 25 octobre 2002 à 11:29:28 | Re : ifthenelse

vroumm
Merci beaucoup
ça fonctionne
flo


-------------------------------
Réponse au message :
-------------------------------

tres simple :
c'est parce que tu ecris a la suite de ton Then

faut ecrire :
If Option1.Value = True Then
quoi = InputBox("Quoi?")
Else
If Option2.Value = True Then
que = InputBox("quoi")
Else
If Option3.Value = True Then
qui = InputBox("quoi?")
End If
End If
End If




-------------------------------
Réponse au message :
-------------------------------

J'ai une question tres simple.
Je ne comprend pas pourquoi lors de l'exécution le message suivant s'affiche: "Erreur de compilation: Else sans If"
Voila le code:
If Option1.Value = True Then quoi = InputBox("Quoi?")

ElseIf Option2.Value = True Then que = InputBox("quoi")

ElseIf Option3.Value = True Then qui = InputBox("quoi?")

End If

Merci


Cette discussion est classée dans : true, inputbox, value, ifthenelse

Répondre à ce message

Sujets en rapport avec ce message

contrôle Frame [ par doumenstein ] comment affecter une valeur "chaine de caractères" a plusieurs controles option bouton dans un controle Frame,dans le code j'ai : 1Frame et 4OptionBut Keydown [ par JeffC1977 ] Salut à tous...J'ai un bug avec mon keydownvoici mon codePrivate Sub form_Keydown(KeyCode As Integer, Shift As Integer)    Select Case KeyCode        Au secours !!!!! [ par BioMAT ] Voila je travaille sur access, et il a bien fallut que je me mette à visual basic pour obtenir de meilleures performances !!donc je me retrouve avec d comment passer de feuille en feuille [ par bouazizsalah ] Salut :je voudrais vous demander comment passer de feuille en feuille dans le v.b car j'ai concu un projet ou il ya 4 feuille celle de demarage donne VB6 Problème de date pour congés payés [ par schlatagaz ] Bonjour à tous j'ai besoin d'une aide urgente pour mettre en place le code adequat a ma question ('fin dupost) Alors j'ai une userform ou il y a : ==> pb avec optionbutton [ par snake57 ] Bonjour,Alors voila dans mon programme je fais un test sur 4 optionbutton et en fonction de celui qui est coché j'éxecute une fonction.Voila comment j Erreur constitution de liste de choix en VBA [ par marmotte78 ] Bonjour a tousJ'ai un gros souci avec un petit bout de code, je vous explique :Je souhaite charger une liste de choix dans la cellule (i,j) et l'appli Gestion du clavier [ par jeffcantin ] Bonjour..Bon c'est encore moi, désolé de mon état de débutant pour ceux qui lisent depuis quelques jours mes messages, mais j'ai toujours un bug avec Probleme d'enregistrement de donnée [ par codry ] Bonjour j'ai un petit probleme d'enregistrement de donnée dans un base de donnée access pour eviter toutes question j'ai mi en haut de mon programme Aide arrondi et chiffres apres la virgule DOUBLE [ par trollfever ] Salut à tous, je me suis mis a chipoter une peu sur le VBA depuis peu, et la suis sur un os... J'ai un petit problème : je n'arrive pas pas à récupure


Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

Photo Happy Bright Landscape WIth ButterfliesPhoto Monument Valley Utah known as The Mittens
Photo Tropical Location With Palm Tree and Woman Holding Umbrella 

Visiter la photothèque
 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 1,903 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)