IF :
if est l'une des commandes Visual Basic les plus utilisées. La commande If fait parti d'une instruction multiligne.
Voici le format de if :
If condition then
instruction
End if
"If", en anglais, signifie "si". Par exemple,
Si condition remplies alors
choses a faires
Fin de si
Sans s'en apercevoir, on emploie desinstructionde type if tout les jours :
-Si (if) je recois mon chèque, alors (then) je payerai mon loyer dans les temps.
___condition___ _________instruction_______
Plusieurs condition peuvent etre spécifier, ces pourquois il existe "elseif" et "else".
Elseif spécifie une autre condition précise, dans une instruction if, on peut rajouté autant de "elseif" que l'on veut.
Else, quant a lui, spécifie toutes les autres conditions possibles.
Voici le format (a respecter):
If condition1 then
instruction1
Elseif condition2 then
instruction2
Else
instruction3
End if
Vous avez surement remarqué qu'aucune condition n'est spécifiée pour"else", normal puique else représente toutes les autres conditionspossibles.
Si une instruction if est ouvert dans une autre instruction "if" (ajoutde condition...) alors, le "end if" refermera la derniere instruction"if" ouverte.
Nous verrons l'utilisations de l'instruction if plus tard.
MSGBOX() :
Msgbox() est une fonction qui affiche une boite de message (msg= message ; box = boite). Une boite de message contient une icone, unmessage, un titre, et au moins un bouton de commande. Ce bouton decommande laisse à l'utilisateur de prendreconnaissance du message;lorsqu'il aura finit sa lecture, il cliquera sur le bouton.
...::: DEFINITION :::... Uneboite de message est une petite boite de dialogue dont on se sert pourinformer un utilisateur à tout moment de l'execution d'un programme. Laboite de dialogue peut etre fermé, grace au bouton de commande, ainsique déplacé; elle ne peut etre redimmensionnée.
Lesarguments donnés a la fonction msgbox() sont insérés entre lesparenthèses (). Ils déterminent l'icone qui sera affichée, le message,le titre, et le nombre de bouton de commande.
Voici le format msgbox :
Msgbox ("message" , style ,"titre")
Les arguments "message" et "titre" sont placé entre guillemets puiqu'ils représentent une chainede caracteres.
Style représente l'icone, le bouton etc...
les arguments de style sont écrits, soit avec une valeur, soit avec une constante nommé.
Par exemple, pour ajouté le bouton "ok", vous placerez dans l'arguments style, soit :
vbOkOnly ---> constante nommé
soit
0 ---> valeur
Seul l'argument de message est obligatoire. Les autres sont optionnel.
Si aucun argument de bouton n'est spécifié, le bouton ok est affiché par défaut.
Voici la liste des boutons :
valeur | Constante nommée | description
| |
0 | vbOkOnly | Affiche le bouton "Ok" seulement
1 | vbOKCancel | Affiche lebouton "ok" et "annuler"
2 | vbAbortRetryIgnore | bouton "abandonner""rééssayer" "ignorer"
3 | vbYesNoCancel |bouton "oui" "non" "annuler"
4 | vbYesNo |bouton "oui" "non"
5 | vbRetryCancel | bouton"rééssayer" "annuler"
pour afficher une boite demessage avec comme message "Salu, sa va ?" comme titre "question" etcomme bouton "oui" et "non", il faudra tapé :
msgbox ("Salu, sa va ?" ,vbYesNo ,"question")
ou
msgbox("Salu, sa va ?" , 4 ,"question")
les deux sont pareils.
Voici la liste des icones :
valeur |Constante nommée | description
| |
16 | vbCritical | icone d'erreur (une croix blanche entourée d'un rond rouge)
32 | vbQuestion | icone de question (bulle avec point d'interrogation)
48 | vbExclamation | iconed'avertissement (triangle jaune avec pointd'exclamation)
64 | vbInformation |icone d'information (bulle avec la lettre "I")
pour afficher une boite de message avec comme message "Salu, sa va ?"comme titre "question" et comme bouton "oui" et "non" et comme icone,l'icone de question, il faudra tapé :
msgbox ("Salu, sa va ?" ,vbYesNo+vbQuestion ,"question")
ou
msgbox("Salu, sa va ?" , 4+32 ,"question")
les deux reviennent au meme.
Vous l'avez compris, dans l'argument de style, pour ajouter une icone a un boutonou inverse, il faudra mettre un "+" entre.
Chaqueboite de message renvoi une valeur a l'ordinateur, par exemple, sil'utilisateur clique sur "ok" une valeu spécifique sera renvoyer al'ordinateur.
Ainsi, c'est grace a cette valeur renvoyé que l'on pourra utiliser l'instruction if.
d'abord, la liste des valeurs renvoyé :
valeur| constante nommée | description
| |
1 | vbOK | l'utilisateur a cliqué sur "ok"
2 | vbCancel | sur "annuler
3 | vbAbort | sur "abandonner"
4 | vbRetry | sur "rééssayer"
5 | vbIgnore | sur "ignorer"
6 | vbYes | sur "oui"
7 | vbNo | sur "non"
a
insi , voici comment affiché une boite de message avec comme message"Salu, sa va ?" comme titre "question" et comme bouton "oui" et "non"et comme icone, l'icone de question. Et, si l'utilisateur clique suroui, envoi un message "moi aussi", s'il clique sur non, un message"dommage".
(les phrase avec l'apostrophe au début sont des commentaires, visual basic ne les liras pas.)
nomquelconque = msgbox ("Salu, sa va ?" , vbYesNo+vbQuestion , "question")
'il est obligé de spécifié un nom a la boite de message.
if nomquelconque = vbyes then
'si la valeur renvoyé est vbyes alors
msgbox ("moi aussi")
else
'dans les autres cas alors
'il est possibles de mettre : elseif nomquelconque = vbNo then
'mais vu que seul les boutons oui et non sont affiché, si ce n'est pas l'un c'est l'autre...
msgbox ("dommage")
end if
'ne jamais oublier de finir son instruction if
dans cet exemple, les valeurs sont tapées en constante nommée, il était possible de les remplacé par leurs valeurs.
Il existe quelques autres valeurs affectées a l'argument de style, mais elle sont peu utilisées...
Je vous les donne quand meme :
valeur |constante nommée | description
| |
0 | vbDefaultButton1 | Donne le focus* au premierbouton
256 | vbDefaultButton2 | au deuxieme bouton
512 | vbDefaultButton3 | au troisieme bouton
768 | vbDefaultButton4 | au quatrieme bouton
4096 | vbSystemModal | la boite de messagereste toujours au premier plan de l'ecran juqu'a ce que l'utilisateurla ferme.
...::: DEFINITION :::... Lefocus, ou focus de contrôle, désigne le controle (dans la fonctionmsgbox(), le bouton) actuellement séléctionné. Le focus est un peucomme le "bouton par defaut"...
Visual Basic signale le focus en mettant le controle enb surbrillance ou en l'entourant d'un cadre pointillé...
Voila, maintenant vous savez a peu pres tout sur la fonction msgbox().
Maintenant, nous allons passer a la fonction Inputbox() !
Inputbox()
La fonction msgbox() permet d'envoyer des messages a l'utilisateur, etdonne la possibilité a celui-ci de repondre en cliquant sur des boutonsde commande. La suite du code s'execute en fonction du boutonséléctionné. Mais il arrive que la question a poser ne se reponde paspar "oui", "non", ou autre. On peut alors faire appel a la cousine demsgbox() : inputbox() !
La fonction inputbox() et une de boite de message qui s'affiche avec unbouton "ok", "annuler" (comme msgbox ), et.....une zone de texte ! (quipermet a l'utilisateur de repondre par une chaine de caractere (commeson age, adresse etc...) et non de cliqué sur un bouton se limitant a"oui" ou "non".)
Cette combinaison d'une boite de message et d'une zone de texte estappelée boite d'entrée ( en anglais, input-->entrée, box--> boite).
La boite d'entrée n'affiche pas non plus d'icone.
Voici son format :
nomquelconque = inputbox("message" , "titre" , "defaut" , placement X , placement Y)
le "nomquelconque" doit etre spécifié si l'on veut placer une instruction "if"....
"message" est l'argument spécifiant le message. (le message est situer entre deux guillemets "")
"titre" est l'argument spécifiant le titre de la boite d'entrée. (le titre est situer entre deux guillemets "")"defaut" est l'argument indiquant la chaine de caractere qui apparait en premier dans la zone de texte. (defautest situer entre deux guillemets "") il est utilisé pour les repon sesévidentes, comme ça l'utilisateur n'a plu qu'a cliqué sur "ok"placement X est Y indique la position sur l'écran de la boite d'entrée.Je ne m'attarderai pas dessus (et je vous les déconseils) car ils sontdifficiles a maitriser...
l'argument "message" est obligatoire, les autres sont optionnels...
voici comment affiché une boite d'entrée qui demande a l'utilisateurcomment il va, avec comme titre, "question", et comme valeur par defaut"bien". si l'utilisateur entre la valeur "bien"
( valeur par defaut..) un message "moi aussi" apparait. S'il repond"mal" un message "dommage" s'affiche. S'il repond autre chose, unmessage "plouf" apparait.
nomquelconque = inputbox("Comment vas-tu ?" , "question" ,"bien")'boite d'entrée...if nomquelconque = "bien" then'si l'utilisateur repond "bien" alors
'l'argument renvoyé est une chaine de caractere, et donc, est entre guillemets "".
msgbox ("moi aussi")elseif nomquelconque = "mal" then'si l'utilisateur repond "mal" alorsmsgbox ("dommage")else'si l'utilisateur repond autre chose, alorsmsgbox ("plouf")end if
Voila ! maintenant, vous maitriserparfaitement la fonction msgbox()! et presque autant la fonctioninputbox()! ainsi que l'instruction if !
J'espere que bon nombre d'apprentis vont s'enrichir et n'oublier de me faire part de vos commentaires !
merci de votre attention
ps: désolai pour lé fote dorhtografe mè je caurijerè sa biunto!
;)