Programmation avec Microsoft Visual Basic. NET Réponses aux questions Solutions des exercices - Diane Zak

La page est créée Claudine Julien

Ordinateurs et technique

Français

Like
Partager
Intégrer
Plein écran
Diapositives
Télécharger HTML
Télécharger PDF
Abus

←

CONTINUER À LIRE

→

Transcription du contenu de la page

Si votre navigateur ne rend pas la page correctement, lisez s'il vous plaît le contenu de la page ci-dessous

Programmation avec
                         Microsoft Visual Basic. NET

                                                            Diane Zak

                                 Réponses aux questions
                                 Solutions des exercices

                                                   ISBN 2-89377-273-0

© 2003 Éditions Reynald Goulet inc. Tous droits réservés.               Page 1

Présentation
Questions
1. d programme
2. d du langage machine
3. a assembleur
4. b de haut niveau
5. c interpréteur
6. b compilateur
7. a assembleur
8. d orienté objet et piloté par les événements
9. a Vrai
10. a Vrai
11. c classe
12. d Parler
13. c une instance
14. c l’encapsulation
15. a abstraction
16. a parente, dérivées
17. e l’héritage
18.   a) Tête, corps, pattes, cœur, poumons
      b) Manger, courir, jouer, marcher, japper
      c) trois

© 2003 Éditions Reynald Goulet inc. Tous droits réservés.   Page 2

Tutoriel 1 – Leçon A
Questions
1. d modèle
2. c solution
3. c Propriétés
4. d Explorateur de solutions
5. c .sln
6. e Aucune de ces réponses.
7. e .vb
8. e .vb
9. c Text
10. d Name
11. e Toutes ces réponses.
12. e StartPosition
13. a BackgroundImage
14. a Vrai
15. a Vrai
16. Une application Windows possède une interface utilisateur sous Windows et s’exécute sur un
ordinateur autonome. Une application Web propose une interface utilisateur intégrée à un navigateur
Web et s’exécute sur un serveur.
17. La propriété Text contrôle le texte qui s’affiche dans la barre de titre du formulaire Windows et sur le
bouton de l’application qui apparaît dans la barre de tâches de Windows pendant que l’application
s’exécute. La propriété Name attribue un nom à l’objet Windows Form; ce nom sert ensuite à toute
référence à ce formulaire dans le code de programme.
18. Un objet Windows Form constitue le formulaire en soi. La fenêtre du concepteur de vues permet de
visualiser l’objet Windows Form qui apparaît ensuite à l’écran lors de l’exécution de l’application.
L’objet fichier du formulaire est le fichier sur disque contenant le code de programme qui crée l’objet
Windows Form.
19. Une référence est l’adresse d’une cellule de la mémoire interne de l’ordinateur. Un espace de nom est
un bloc de cellules mémoire qui contiennent les définitions de classes associées.
20. L’opérateur point de sélection de membre indique que la classe Label est un membre de l’espace de
nom Windows, lui-même membre de l’espace de nom System.

Exercices
1. Voir les fichiers de VBNET\Tut01\LA Solution Charités dans le Disque des solutions.
2. Voir les fichiers de VBNET\Tut01\LA Solution Photo dans le Disque des solutions. (L’image
d’arrière-plan peut varier par rapport à celle proposée.)
3. Voir les fichiers de VBNET\Tut01\LA Solution Vancouver dans le Disque des solutions.
4. (Découverte) Voir les fichiers de VBNET\Tut01\LA Solution Boisvert dans le Disque des solutions.
d. La propriété ControlBox détermine si un formulaire possède dans sa barre de titre un menu
Système.
e. Le réglage de la propriété ControlBox à False supprime l’icône, ainsi que les boutons Réduire,
Agrandir et Fermer de la barre de titre du formulaire.
g. La propriété MaximizeBox détermine si un formulaire possède un bouton Agrandir dans sa barre
de titre.
h. Le réglage de la propriété MaximizeBox à False provoque la mise en gris du bouton Agrandir
dans la barre de titre du formulaire.

j. La propriété MinimizeBox détermine si un formulaire possède un bouton Réduire dans sa barre
de titre.
k. Le réglage de la propriété MinimizeBox à False provoque l’affichage en gris du bouton Réduire
dans la barre de titre du formulaire.
5. (Découverte) Voir les fichiers de VBNET\Tut01\LA Solution Boisvert dans le Disque des solutions.
d. La propriété DrawGrid de l’objet Windows permet de supprimer l’affichage des points de grille
sur le fond du formulaire.
e. La propriété ShowInTaskbar détermine si la valeur stockée dans la propriété Text du formulaire
apparaît ou non dans la barre des tâches de Windows quand l’application s’exécute.

Tutoriel 1 – Leçon B
Questions
1. e Windows Forms
2. e Aucune de ces réponses.
3. c Label
4. a AutoSize
5. e Text
6. e b (Des poignées de dimensionnement apparaissent autour du contrôle.) et c (La zone d’objet de la
fenêtre Propriétés affiche le nom et la classe du contrôle.)
7. d a (Une ligne fine entoure le contrôle.) et c (La zone d’objet de la fenêtre Propriétés affiche le nom
et la classe du contrôle.)
8. a pixels entre la bordure gauche du formulaire et le côté gauche du contrôle
9. e Toutes ces réponses.
10. e Toutes ces réponses.
11. c Image
12. e SizeMode
13. b System.Windows.Forms
14. e Text
15. b Le fichier exécutable que Visual Studio .NET crée automatiquement lorsque vous démarrez une
application possède le même nom que la solution, mais porte une extension .exe.
16. a Me.Close
17. b événements
18. Le terme syntaxe fait référence aux règles d’un langage de programmation.
19. La zone de liste Nom de la classe sert à sélectionner l’objet à programmer, tandis que la zone de liste
Nom de la méthode permet de choisir l’événement à programmer.
20. Un mot-clé est un mot qui porte une signification particulière pour un langage de programmation.

Exercices
1. Voir les fichiers de VBNET\Tut01\LB Solution Mécanique dans le Disque des solutions.
2. Voir les fichiers de VBNET\Tut01\LB Solution Costello dans le Disque des solutions.
3. Voir les fichiers de VBNET\Tut01\LB Solution Tabatha dans le Disque des solutions.
4. (Découverte) Voir les fichiers de VBNET\Tut01\LB Solution Jarreau dans le Disque des solutions.

Tutoriel 1 – Leçon C
Questions
1. c minuterie
2. a Enabled
3. d procédure événementielle Tick
4. c 10 000
5. b L’utilisateur peut voir un contrôle de minuterie pendant que l’application s’exécute.
6. d MinimizeBox
7. e Aucune de ces réponses.
8. a ControlBox
9. Pour imprimer le code de programme d’un projet, ouvrez la fenêtre de l’Éditeur de code, cliquez sur
le menu Fichier | Imprimer, puis cliquez sur le bouton OK de la boîte de dialogue Imprimer.
10. Supprimez le contrôle du formulaire. Ensuite, ouvrez la fenêtre de l’Éditeur de code et supprimez les
procédures d’événement associées à ce contrôle.

Exercices
1. Voir les fichiers de VBNET\Tut01\LC Solution Jefferson dans le Disque des solutions.
2. Les instructions données à l’étudiant consistent à créer sa propre interface utilisateur. L’interface doit
comporter un ou plusieurs contrôles étiquettes (Label) et images (PictureBox). Elle doit également
comporter un bouton qui termine l’application lors d’un clic.
3. (Découverte) Voir les fichiers de VBNET\Tut01\LC Solution Icône dans le Disque des solutions.
(Cette solution est également utilisée à l’exercice de Découverte 4, dans laquelle l’étudiant apprend à
afficher un graphisme sur la face de chaque bouton de commande.)
4. (Découverte) Voir les fichiers de VBNET\Tut01\LC Solution Icône dans le Disque des solutions.
5. (Découverte) Voir les fichiers de VBNET\Tut01\LC Solution Infobulle dans le Disque des solutions.
6. (Débogage) Voir les fichiers de VBNET\Tut01\LC Solution Débogage dans le Disque des solutions.
Pour déboguer cette solution, l’étudiant doit supprimer la procédure d’événement Click du contrôle
étiquette de la fenêtre de l’Éditeur de code, puis écrire la méthode Me.Close dans la procédure
d’événement Click du contrôle bouton.

Tutoriel 2 – Leçon A
Questions
1. c étiquette
2. e zone de texte
3. a bouton de commande
4. e TOE
5. a soit horizontalement, soit verticalement
6. d en haut à gauche
7. d toutes ces réponses.
8. e a (centrés en bas de l’écran) ou c (regroupés dans le coin inférieur ou supérieur droit)
9. d six
10. a en premier
11. d La légende d’un bouton de commande se termine toujours par un deux-points (:).
12. b Posséder une majuscule uniquement au début du premier mot.
13. c Les légendes associées à des zones de texte doivent présenter des majuscules au début de chaque
    mot.
14. b emploi d’une majuscule en début de phrase
15. a emploi de majuscules pour les grands titres
16. 2 Identification des objets auxquels seront affectées les tâches.
    4 Réalisation d’une esquisse de l’interface utilisateur.
    1 Identification des tâches devant être accomplies par l’application.
    3 Identification des événements déclenchant les tâches affectées à un objet.
17. 5 Tester et déboguer l’application.
    3 Construire l’interface utilisateur.
    4 Rédiger le code de l’application.
    6 Assembler la documentation.
    2 Réaliser la conception générale de l’application.
    1 Rencontrer et discuter avec le client.

© 2003 Éditions Reynald Goulet inc. Tous droits réservés.                                         Page 6

Exercices
1. Les diagrammes TOE et les esquisses peuvent varier.

Tâche                                   Objet                 Événement
Demander à l’utilisateur :
 nom                                    NomTextBox            Aucun
 territoire                             TerritoireTextBox     Aucun
 chiffre                                VentesTextBox         Aucun
Calculer la commission                  CalculerButton        Click
Afficher :
 nom                                    NomTextBox            Aucun
 territoire                             TerritoireTextBox     Aucun
 chiffre                                VentesTextBox         Aucun
 commission                             CalculerButton,       Click, Aucun
                                        CommissionLabel
Terminer l’application                  QuitterButton         Click
Effacer l’écran                         EffacerButton         Click

Tâche                                   Objet                                Événement
1. Calculer la commission               CalculerButton                       Click
2. Afficher la commission
    dans le contrôle
    CommissionLabel
Effacer l’écran                         EffacerButton                        Click
Terminer l’application                  QuitterButton                        Click
Afficher la commission (par             CommissionLabel                      Aucun
CalculerButton)
Demander et afficher le                 NomTextBox, TerritoireTextBox,       Aucun
nom, le territoire et le                VentesTextBox
chiffre de ventes

© 2003 Éditions Reynald Goulet inc. Tous droits réservés.                                Page 7

Aperçu suivant une organisation horizontale :

Aperçu suivant un agencement vertical :

© 2003 Éditions Reynald Goulet inc. Tous droits réservés.   Page 8

2. Les diagrammes TOE et les esquisses peuvent varier.

Tâche                                        Objet                             Événement
Demander à l’utilisateur :
- Les chiffres de vente de                   NventesTextBox, SventesTextBox,   Aucun
l’année courante pour chaque                 EventesTextBox, OventesTextBox    Aucun
région                                       NaugTextBox, SaugTextBox,
- L’augmentation prévue en %                 EaugTextBox, OaugTextBox
pour chaque région
Calculer les ventes prévues pour             CalculerButton                    Click
chaque région
Afficher :
- Les ventes de cette année pour             NventesTextBox, SventesTextBox,   Aucun
chaque région                                EventesTextBox, OventesTextBox
- L’augmentation prévue en %                 NaugTextBox, SaugTextBox,         Aucun
pour chaque région                           EaugTextBox, OaugTextBox
- Les ventes prévues pour                    CalculerButton,                   Click,
chaque région                                NventesLabel, SventesLabel,       Aucun, Aucun,
                                             EventesLabel, OventesLabel        Aucun, Aucun
Terminer l’application                       QuitterButton                     Click
Effacer l’écran                              EffacerButton                     Click

Tâche                                        Objet                             Événement
1. Calculer les ventes prévues               CalculerButton                    Click
    pour chaque région
2. Afficher les ventes prévues
    dans les contrôles
    NventesLabel,
    SventesLabel, EventesLabel
    et OventesLabel
Effacer l’écran                              EffacerButton                     Click
Terminer l’application                       QuitterButton                     Click
Afficher les ventes prévues (par             NventesLabel, SventesLabel,       Aucun
CalculerButton)                              EventesLabel, OventesLabel
Demander et afficher le                      NaugTextBox, SaugTextBox,         Aucun
pourcentage d’augmentation                   EaugTextBox, OaugTextBox
prévu pour chaque région
Demander et afficher les ventes              NventesTextBox, SventesTextBox,   Aucun
de cette année pour chaque                   EventesTextBox, OventesTextBox
région

© 2003 Éditions Reynald Goulet inc. Tous droits réservés.                                      Page 9

Aperçu suivant une organisation horizontale :

Aperçu suivant un agencement vertical :

3. Voir les fichiers de VBNET\Tut02\LA Exo3 Solution Temps dans le Disque des solutions. Les
   réponses peuvent varier.

© 2003 Éditions Reynald Goulet inc. Tous droits réservés.                                      Page 10

Tutoriel 2 – Leçon B
Questions
1. c TabIndex
2. b deux ou trois
3. a la même hauteur
4. c la même hauteur et la même largeur
5. e b (la couleur par rapport au noir et blanc) et c (les graphismes par rapport au texte)
6. b du texte sombre sur un fond clair
7. b 8, 9, 10, 11 ou 12 points
8. a une ou deux
9. a sans empattement (sans serif)
10. a une
11. d BorderStyle
12. a &
13. e Text
14. Le tout premier choix d’une touche d’accès rapide réside dans la première lettre de la légende ou de
    l’étiquette d’identification, à moins qu’une autre lettre offre une association plus naturelle ou plus
    explicite. S’il n’est pas possible d’utiliser la première lettre ou si aucune autre lettre n’assure une
    association naturelle, alors vous pouvez utiliser une consonne distincte de la légende ou de l’étiquette.
    Ce n’est qu’en tout dernier ressort que vous pouvez utiliser une voyelle ou un chiffre de la légende ou
    de l’étiquette.
15. Pour donner accès à une zone de texte à l’aide d’une touche d’accès rapide, attribuez une touche
    d’accès rapide à son contrôle étiquette d’identification. Ensuite, ajustez la propriété TabIndex de
    l’étiquette à une valeur inférieure d’une unité à celle de la zone de texte.

Exercices
1. Voir les fichiers de VBNET\Tut02\LB Solution Papier dans le Disque des solutions.
2. Voir les fichiers de VBNET\Tut02\LB Solution Diffusion RM dans le Disque des solutions.
3. Voir les fichiers de VBNET\Tut02\LB Solution Temps dans le Disque des solutions.

Tutoriel 2 – Leçon C
Questions
1. d Me.NomTextBox.Text = "Girard"
2. e Toutes ces réponses sont valides
3. c Format
4. e Val
5. 6 Assembler la documentation.
   2 Planifier l’application.
   4 Écrire le code de l’application.
   3 Construire l’interface utilisateur.
   5 Tester et déboguer l’application.
   1 Rencontrer le client.

© 2003 Éditions Reynald Goulet inc. Tous droits réservés.                                              Page 11

6. a erreur de logique
7. b erreur de syntaxe
8. 2,92
9. 2
10. 23

Exercices
1. Voir les fichiers de VBNET\Tut02\LC Solution Papier dans le Disque des solutions. Réponse obtenue
pour les données de test : commission de 250,00 $.
2. Voir les fichiers de VBNET\Tut02\LC Solution Diffusion RM dans le Disque des solutions. Les
réponses obtenues pour les données de test : les ventes prévues pour le nord sont de 26 250,00; celles
du sud, de 32 100,00; celles de l’est, de 10 400,00; et celles de l’ouest, de 16 650,00.
3. Voir les fichiers de VBNET\Tut02\LC Solution Temps dans le Disque des solutions. Les réponses
obtenues pour les données de test sont 30 heures pour les jours de semaine et 2 heures pour les jours
de fin de semaine.
4. Voir les fichiers de VBNET\Tut02\LC Solution Twips dans le Disque des solutions. (La solution
proposée affiche le nombre de pouces comme valeur intermédiaire. La solution peut éluder la valeur
en pouces. L’interface peut également comporter un bouton Effacer.) Les réponses obtenues par la
première donnée de test sont 2 pouces ou 5,08 cm. Les réponses obtenues pour la seconde donnée de
test sont 0 pouce et 0 cm.

Tâche Objet Événement
1. Convertir les twips en pouces, puis CalculerButton Click
les twips en centimètres
2. Afficher le nombre de pouces et de
centimètres dans les contrôles
PoucesLabel et CmLabel
Terminer l’application QuitterButton Click
Afficher le nombre de pouces et de PoucesLabel, Aucun
centimètres (par CalculerButton) CmLabel
Demander et afficher le nombre de twips TwipsTextBox Aucun

Pseudocode :
CalculerButton
Calculer le nombre de pouces = nombre de twips / 1440
calculer le nombre de centimètres = nombre de twips * 2.54 / 1440
Afficher le nombre de pouces dans le contrôle PoucesLabel.
Afficher le nombre de centimètres dans le contrôle CmLabel.
Donner le focus au contrôle TwipsTextBox.

QuitterButton
Terminer l’application.

5. Voir les fichiers de VBNET\Tut02\LC Solution Solde dans le Disque des solutions. (L’interface peut
ne pas comporter de bouton Effacer.)
La réponse obtenue pour le premier ensemble de données est de 4 500 pour le solde final. La réponse
obtenue pour le second ensemble de données de test est de 0 pour le solde final.

Tâche Objet Événement
1. Calculer le solde final CalculerButton Click
2. Afficher le solde final dans le contrôle
FinalLabel
Effacer l’écran EffacerButton Click
Terminer l’application QuitterButton Click
Afficher le solde final (par CalculerButton) FinalLabel Aucun
Demander et afficher le solde initial, les InitialTextBox, Aucun
gains du mois, les dépenses du mois GainsTextBox,
DépensesTextBox

Pseudocode :
CalculerButton
Calculer le solde final = solde initial + gains du mois – dépenses du mois.
Afficher le solde final dans le contrôle FinalLabel.
Donner le focus au bouton EffacerButton.

EffacerButton
Vider le contenu de la propriété Text des contrôles InitialTextBox, GainsTextBox,
DépensesTextBox.
Vider le contenu de la propriété Text du contrôle FinalLabel.
Donner le focus au contrôle InitialTextBox.

QuitterButton
Terminer l’application.

6. Voir les fichiers de VBNET\Tut02\LC Solution Moyenne dans le Disque des solutions. (L’interface
peut ne pas comporter de bouton Effacer.)
La réponse obtenue pour le premier ensemble de données de test est de 18.
La réponse obtenue pour le deuxième ensemble de données de test est de 0.

Tâche Objet Événement
1. Calculer la moyenne de trois nombres CalculerButton Click
2. Afficher la moyenne dans le contrôle
MoyenneLabel
Effacer l’écran EffacerButton Click
Terminer l’application QuitterButton Click
Afficher la moyenne (par CalculerButton) MoyenneLabel Aucun
Demander et afficher les premier, Nbre1TextBox, Aucun
deuxième et troisième nombres Nbre2TextBox,
Nbre3TextBox

© 2003 Éditions Reynald Goulet inc. Tous droits réservés.   Page 14

Pseudocode :
CalculerButton
      Calculer la moyenne = (premier nombre + deuxième nombre + troisième nombre) / 3
      Afficher la moyenne dans le contrôle MoyenneLabel.
      Donner le focus au bouton Effacer.

EffacerButton
       Vider le contenu de la propriété Text des contrôles Nbre1TextBox, Nbre2TextBox,
              Nbre3TextBox.
       Vider la propriété Text du contrôle MoyenneLabel.
       Donner le focus au contrôle Nbre1TextBox.

QuitterButton
       Terminer l’application

7. Voir les fichiers de VBNET\Tut02\LC Solution Rats de Bibliothèque dans le Disque des solutions.
   (L’interface peut ne pas comporter de bouton Effacer.)
   Les réponses obtenues avec les données de l’exemple 1 sont : 4 000,00 $ pour la valeur des éditions
   de poche, 3 750,00 $ pour la valeur des éditions brochées, un total de 150 versions et une valeur
   totale de 7 750,00 $.
   Les réponses obtenues avec les données de l’exemple 2 sont : 0,00 $ pour la valeur des éditions de
   poche, 0,00 $ pour la valeur des éditions brochées, un total de 0 versions et une valeur totale de
   0,00 $.

Tâche                                                       Objet                  Événement
1. Calculer la valeur des éditions de                       CalculerButton         Click
    poche, la valeur des éditions
    brochées, le nombre total des éditions
    de poche et des éditions brochées,
    ainsi que la valeur totale des éditions
    de poche et des éditions brochées
2. Afficher les montants calculés dans
    les contrôles ValeurPocheLabel,
    ValeurBrochéLabel,
    NombreTotalLabel et
    ValeurTotaleLabel
Effacer l’écran                                             EffacerButton          Click
Terminer l’application                                      QuitterButton          Click
Afficher la valeur des éditions de poche,                   ValeurPocheLabel,      Aucun
la valeur des éditions brochées, le nombre                  ValeurBrochéLabel,
total d’éditions de poches et d’éditions                    NombreTotalLabel,
brochées, ainsi que la valeur totale des                    ValeurTotaleLabel
éditions de poche et des éditions brochées
versions (par CalculerButton)
Demander et afficher le titre, le nombre                    TitreTextBox,          Aucun
de versions en édition de poche, le                         NombrePocheTextBox,
nombre de versions en édition brochée, le                   NombreBrochéTextBox,
© 2003 Éditions Reynald Goulet inc. Tous droits réservés.                                         Page 15

prix de la version en édition de poche et                   PrixPocheTextBox,
le prix de la version en édition brochée                    PrixBrochéTextBox

© 2003 Éditions Reynald Goulet inc. Tous droits réservés.                       Page 16

Pseudocode :
CalculerButton
Calculer la valeur des éditions de poche = nombre d’éditions de poche * prix de l’édition de
poche.
Calculer la valeur des éditions brochées = nombre d’éditions brochées * prix de l’édition
brochée.
Calculer le nombre total d’éditions de poche et d’éditions brochées = nombre d’éditions de
poche + nombre d’éditions brochées.
Calculer la valeur totale des éditions de poche et des éditions brochées = la valeur des
éditions de poche + la valeur des éditions brochées.
Afficher la valeur des éditions de poche, la valeur des éditions brochées, le nombre total
d’éditions de poche et d’éditions brochées, ainsi que la valeur totale des éditions de
poche et des éditions brochées, respectivement dans les contrôles ValeurPocheLabel,
ValeurBrochéLabel, NombreTotalLabel et ValeurTotaleLabel.
Donner le focus au bouton EffacerButton.

EffacerButton
Effacer le contenu de la propriété Text des contrôles TitreTextBox, NombrePocheTextBox,
NombreBrochéTextBox, PrixPocheTextBox et PrixBrochéTextBox.
Effacer le contenu de la propriété Text des contrôles ValeurPocheLabel, ValeurBrochéLabel,
NombreTotalLabel et ValeurTotaleLabel.
Donner le focus au contrôle TitreTextBox.

QuitterButton
Terminer l’application

8. Voir les fichiers de VBNET\Tut02\LC Solution Aux Mille Chemises dans le Disque des solutions.
(L’interface peut comporter aussi un bouton Effacer.)
Attention : ici, il est important d’insister sur le fait que Val rejette la virgule en tant que séparateur
décimal. En effet, pour la première donnée de test, prix normal = 50, la remise est de 12,50, mise au
format standard. Ensuite, Val(RemiseLabel) donne 12 et non 12.50. Par conséquent, le nouveau prix
devient 50 – 12 = 38, au lieu des 37,50 attendus.
Pour éviter cet écueil, il est capital d’utiliser la fonction CDbl qui tient compte du séparateur décimal
indiqué dans les options régionales. CDbl("12,50") donne 12.50 et le nouveau prix devient 50 – 12.50
= 37.50, ce qui donne, mis au format Standard, 12,50.
Enfin, l’emploi impératif de CDbl est dicté par le fait que la valeur que cette fonction reçoit a une
virgule comme séparateur décimal, issue de la mise au format Standard du contenu de RemiseLabel.
Si nous affichions la remise telle qu’elle est issue du calcul Val(PrixNormalTextBox.Text), et à
condition que cette propriété contienne une valeur sans décimale et (ou) sans virgule décimale, le
résultat de l’opération de calcul de remise s’afficherait sous la forme décimale, avec point décimal,
auquel cas, CDbl provoquerait une erreur.
En effet, si Val élude sans autre forme de procès la virgule décimale et la partie décimale d’un
nombre, CDbl provoque une erreur si elle rencontre un point inattendu.
Les réponses obtenues pour le premier ensemble de données de test : une remise de 12,50 et un
nouveau prix de 37,50.

Les réponses obtenues pour le deuxième ensemble de données de test : une remise de 0,00 et un
    nouveau prix de 0,00.

© 2003 Éditions Reynald Goulet inc. Tous droits réservés.                                           Page 18

Tâche Objet Événement
1. Calculer la remise et le nouveau prix CalculerButton Click
2. Afficher la remise et le nouveau prix
dans les contrôles RemiseLabel et
NouveauPrixLabel
Terminer l’application QuitterButton Click
Afficher la remise et le nouveau prix (par RemiseLabel, Aucun
CalculerButton) NouveauPrixLabel
Demander et afficher le prix normal PrixNormalTextBox Aucun

Pseudocode :
CalculerButton
Calculer la remise = prix normal * 25%
Calculer le nouveau prix = prix normal – remise
Afficher la remise dans le contrôle RemiseLabel.
Afficher le nouveau prix dans le contrôle NouveauPrixLabel
Donner le focus au contrôle PrixNormalTextBox.

QuitterButton
Terminer l’application.

9. Voir les fichiers de VBNET\Tut02\LC Solution Pre-textes dans le Disque des solutions. (L’interface
peut ne pas comporter de bouton Effacer.)
Les réponses obtenues pour le premier ensemble de données de test : le total dû est de 75,00 $.
Les réponses obtenues pour le deuxième ensemble de données de test : le total dû est de 0,00 $.

Tâche Objet Événement
1. Calculer le total dû CalculerButton Click
2. Afficher le total dû dans le contrôle
TotalLabel
Effacer l’écran EffacerButton Click
Terminer l’application QuitterButton Click
Afficher le total dû (par CalculerButton) TotalLabel Aucun
Demander et afficher le nom, le nombre NomTextBox, Aucun
d’enveloppes imprimées et le nombre de EnveloppesTextBox,
pages imprimées PagesTextBox

Pseudocode :
CalculerButton
Calculer total dû = nombre d’enveloppes imprimées * .10 + nombre de pages imprimées * .25.
Afficher le total dû dans le contrôle TotalLabel.
Donner le focus au bouton EffacerButton.

EffacerButton
Effacer le contenu de la propriété Text des contrôles NomTextBox, EnveloppesTextBox et
PagesTextBox.
Effacer le contenu de la propriété Text du contrôle TotalLabel.
Donner le focus au contrôle NomTextBox.

QuitterButton
Terminer l’application.

10. Voir les fichiers de VBNET\Tut02\LC Solution Formaction dans le Disque des solutions. (L’interface
peut ne pas comporter de bouton Effacer.)
Les réponses obtenues pour le premier ensemble de données de test : 15 inscrits et un montant total
de 3 000,00 $.
Les réponses obtenues pour le deuxième ensemble de données de test : 0 inscrit et un montant total de
0.00 $.

Tâche Objet Événement
1. Calculer le nombre total de CalculerButton Click
participants et le montant total
2. Afficher le nombre total de
participants et le montant total dans
les contrôles NombreTotalLabel et
MontantTotalLabel
Effacer l’écran EffacerButton Click
Terminer l’application QuitterButton Click
Afficher le nombre total de participants et NombreTotalLabel, Aucun
le montant total (par CalculerButton) MontantTotalLabel
Demander et afficher le nom, l’adresse, la NomTextBox, Aucun
ville, le code postal, le pays (ou province) AdresseTextBox,
le nombre de participants inscrits au VilleTextBox, PaysTextBox,
séminaire "Être un gestionnaire CPTextBox, EfficaceTextBox,
efficace" et le nombre de participants GérerTextBox
inscrits au séminaire "Gérer une petite
entreprise"

Pseudocode :
CalculerButton
Calculer le nombre total de participants = nombre de participants inscrits au séminaire
"Être un gestionnaire efficace" + nombre de participants inscrits au séminaire "Gérer
une petite entreprise".
Calculer le montant total = nombre total de participants * 200.
Afficher le nombre total de participants dans le contrôle NombreTotalLabel.
Afficher le montant total dans le contrôle MontantTotalLabel.
Donner le focus au bouton EffacerButton.

EffacerButton
Effacer le contenu de la propriété Text des contrôles NomTextBox, AdresseTextBox,
VilleTextBox, PaysTextBox, CPTextBox, EfficaceTextBox et GérerTextBox.
Effacer le contenu de la propriété Text des contrôles NombreTotalLabel et
MontantTotalLabel.
Donner le focus au contrôle NomTextBox.

QuitterButton
Terminer l’application.

11. Voir les fichiers de VBNET\Tut02\LC Projets solaires dans le Disque des solutions. (L’interface peut
ne pas comporter de bouton Effacer.)
Les réponses obtenues pour le premier ensemble de données de test : salaire brut de 480.00, assurance
maladie de 96.00, cotisation de retraite de 38.40, assurance chômage de 9.60 et salaire net de 336.00.
Les réponses obtenues pour le deuxième ensemble de données de test : salaire brut de 0.00, assurance
maladie de 0.00, cotisation de retraite de 0.00, assurance chômage de 0.00 et salaire net de 0.00.

Tâche Objet Événement
1. Calculer le salaire brut, la cotisation CalculerButton Click
d’assurance maladie, la cotisation de
retraite, la cotisation d’assurance
chômage et le salaire net
2. Afficher les montants calculés dans
les contrôles BrutLabel,
MaladieLabel, RetraiteLabel,
ChômageLabel et NetLabel
Effacer l’écran EffacerButton Click
Terminer l’application QuitterButton Click
Afficher le salaire brut, la cotisation BrutLabel, MaladieLabel, Aucun
d’assurance maladie, la cotisation de RetraiteLabel, ChômageLabel,
retraite, la cotisation d’assurance NetLabel
chômage et le salaire net (par
CalculerButton)
Demander et afficher le nom, les heures NomTextBox, HeuresTextBox, Aucun
travaillées et le tarif horaire du salaire TarifTextBox

© 2003 Éditions Reynald Goulet inc. Tous droits réservés.   Page 22

Pseudocode :
CalculerButton
Calculer le salaire brut = heures travaillées * tarif horaire du salaire.
Calculer la cotisation d’assurance maladie = salaire brut * 20%
Calculer la cotisation de retraite = salaire brut * 8%
Calculer la cotisation d’assurance chômage = salaire brut * 2%
Calculer le salaire net = salaire brut – Maladie – Retraite – Chômage.
Afficher le salaire brut dans le contrôle BrutLabel.
Afficher la cotisation d’assurance maladie dans le contrôle MaladieLabel.
Afficher la cotisation de retraite dans le contrôle RetraiteLabel.
Afficher la cotisation d’assurance chômage dans le contrôle ChômageLabel.
Afficher le salaire net dans le contrôle NetLabel.
Donner le focus au bouton EffacerButton.

EffacerButton
Effacer le contenu de la propriété Text des contrôles NomTextBox, HeuresTextBox et
TarifTextBox.
Effacer le contenu de la propriété Text des contrôles BrutLabel, MaladieLabel,
RetraiteLabel, ChômageLabel et NetLabel.
Donner le focus au contrôle NomTextBox.

QuitterButton
Terminer l’application.

12. (Découverte) Voir les fichiers de VBNET\Tut02\LC Solution Commande Exo12 dans le Disque des
solutions.
13. (Découverte) Voir les fichiers de VBNET\Tut02\LC Solution Colfax dans le Disque des solutions.
(L’interface peut comporter aussi un bouton Effacer.) La réponse obtenue pour les données de test est
de : 7 caisses pleines et 3 pièces restantes.

Tâche Objet Événement
1. Calculer le nombre de caisses pleines CalculerButton Click
et le nombre d’articles restants
2. Afficher le nombre de caisses pleines
et le nombre d’articles restants dans
les contrôles dans les contrôles
PleinesLabel et RestantsLabel
Terminer l’application QuitterButton Click
Afficher le nombre de caisses pleines et PleinesLabel, RestantsLabel Aucun
le nombre d’articles restants (par
CalculerButton)
Demander et afficher la quantité QuantitéTextBox, Aucun
d’inventaire et le nombre d’articles QtéParCaisseTextBox
qu’une caisse peut contenir

© 2003 Éditions Reynald Goulet inc. Tous droits réservés.   Page 24

Pseudocode :
CalculerButton
Calculer le nombre de caisses pleines = quantité d’inventaire \ nombre d’articles qu’une
caisse peut contenir.
Calculer le nombre d’articles restants = quantité d’inventaire Mod nombre d’articles qu’une
caisse peut contenir. (Note : l’étudiant peut aussi exploiter la formule suivante :
quantité d’inventaire – nombre de caisses pleines * nombre d’articles qu’une caisse
peut contenir.)
Afficher le nombre de caisses pleines dans le contrôle PleinesLabel.
Afficher le nombre d’articles restants dans le contrôle RestantsLabel.
Donner le focus au contrôle QuantitéTextBox.

QuitterButton
Terminer l’application.

14. (Découverte) Voir les fichiers de VBNET\Tut02\LC Solution Quadrilatère dans le Disque des
solutions. (L’interface peut comporter aussi un bouton Effacer.) La réponse obtenue pour les
données de test est de : 4 500 m.

Tâche Objet Événement
1. Calculer le périmètre d’un polygone CalculerButton Click
2. Afficher le périmètre dans le contrôle
PérimètreLabel
Terminer l’application QuitterButton Click
Afficher le périmètre (par PérimètreLabel Aucun
CalculerButton)
Demander et afficher la longueur des Côté1TextBox, Aucun
quatre côtés du polygone Côté2TextBox,
Côté3TextBox,
Côté4TextBox

Pseudocode :
CalculerButton
Calculer le périmètre du polygone = longueur du côté 1 + longueur du côté 2 + longueur du
côté 3 + longueur du côté 4.
Afficher le périmètre dans le contrôle PérimètreLabel.
Donner le focus au contrôle Côté1TextBox.

QuitterButton
Terminer l’application.

15. (Découverte) Voir les fichiers de VBNET\Tut02\LC Solution Palissades dans le Disque des solutions.
(L’interface peut comporter aussi un bouton Effacer.) Réponses pour les données de test : 113,04 de
circonférence et 226,08 $ pour le prix total.

Tâche Objet Événement
1. Calculer la circonférence d’un cercle CalculerButton Click
et le prix total de la clôture
2. Afficher la circonférence et le prix
total dans les contrôles
CirconférenceLabel et
MontantTotalLabel
Terminer l’application QuitterButton Click
Afficher la circonférence et le prix total CirconférenceLabel, Aucun
(par CalculerButton) MontantTotalLabel
Demander et afficher le diamètre d’un DiamètreTextBox, Aucun
cercle et le prix par mètre de clôture PrixParMètreTextBox

Pseudocode :
CalculerButton
Calculer la circonférence d’un cercle = diamètre du cercle * 3.14
Calculer le prix total de la clôture = circonférence d’un cercle * le prix par mètre de clôture.
Afficher la circonférence dans le contrôle CirconférenceLabel.
Afficher le prix total de la clôture dans le contrôle MontantTotalLabel.
Donner le focus au contrôle DiamètreTextBox.

QuitterButton
Terminer l’application.

16. (Découverte) Voir les fichiers de VBNET\Tut02\LC Solution Travailleurs intemporels dans le Disque
des solutions. (L’interface peut comporter aussi un bouton Effacer.)
Réponses pour le premier ensemble de données : 2 semaines, 1 jour, 0 heures.
Réponses pour le deuxième ensemble de données : 2 semaines, 3 jours, 7 heures.
Réponses pour le troisième ensemble de données : 0 semaines, 1 jour, 4 heures.

Tâche Objet Événement
1. Calculer le nombre de semaines, jours CalculerButton Click
et heures travaillés
2. Afficher le nombre de semaines, jours
et heures travaillés dans les contrôles
SemainesLabel, JoursLabel et
HeuresLabel
Terminer l’application QuitterButton Click
Afficher le nombre de semaines, jours et SemainesLabel, JoursLabel, Aucun
heures travaillés (par CalculerButton) HeuresLabel
Demander et afficher le nombre d’heures HeuresTextBox Aucun

Pseudocode :
CalculerButton
Calculer le nombre de semaines travaillées = nombre d’heures \ 40.
Calculer le nombre de jours travaillés = (nombre d’heures mod 40) \ 8.
Calculer le nombre d’heures travaillées = nombre d’heures mod 40 mod 8.
Afficher le nombre de semaines travaillées dans le contrôle SemainesLabel.
Afficher le nombre de jours travaillés dans le contrôle JoursLabel.
Afficher le nombre d’heures travaillées dans le contrôle HeuresLabel.
Donner le focus au contrôle HeuresTextBox.

QuitterButton
Terminer l’application.

17. (Découverte) Voir les fichiers de VBNET\Tut02\LC Solution Surface au Sol dans le Disque des
solutions. (L’interface peut comporter aussi un bouton Effacer.) Réponses pour les données de test :
l’aire est de 168 m², le prix total est de 267,12 $.

Tâche Objet Événement
1. Calculer l’aire d’un rectangle et le CalculerButton Click
prix total du carrelage
2. Afficher l’aire et le prix total dans les
contrôles AireLabel et
MontantTotalLabel
Terminer l’application QuitterButton Click
Afficher l’aire et le prix total (par AireLabel, MontantTotalLabel Aucun
CalculerButton)
Demander et afficher la longueur d’un LongueurTextBox, Aucun
rectangle, la largeur d’un rectangle et le LargeurTextBox,
prix par mètre carré du carrelage PrixParMètreTextBox

Pseudocode :
CalculerButton
Calculer l’aire d’un rectangle = longueur du rectangle * largeur du rectangle.
Calculer le prix total du carrelage = l’aire du rectangle * le prix par mètre carré du
carrelage.
Afficher l’aire dans le contrôle AireLabel.
Afficher le prix total du carrelage dans le contrôle MontantTotalLabel.
Donner le focus au contrôle LongueurTextBox.

QuitterButton
Terminer l’application.

18. (Découverte) Voir les fichiers de VBNET\Tut02\LC Solution Piscines les Saules dans le Disque des
solutions. (L’interface peut comporter aussi un bouton Effacer.) La réponse obtenue pour les données
de test est de : 462 m³.

Tâche Objet Événement
1. Calculer le volume d’un CalculerButton Click
parallélépipède
2. Afficher le volume dans le contrôle
VolumeLabel
Terminer l’application QuitterButton Click
Afficher le volume (par CalculerButton) VolumeLabel Aucun
Demander et afficher la longueur, la LongueurTextBox, Aucun
largeur et la hauteur du parallélépipède LargeurTextBox,
rectangle HauteurTextBox

Pseudocode :
CalculerButton
Calculer le volume d’un rectangle = longueur * largeur * hauteur du parallélépipède
rectangle.
Afficher le volume dans le contrôle VolumeLabel.
Donner le focus au contrôle LongueurTextBox.

QuitterButton
Terminer l’application.

19. (Découverte) Voir les fichiers de VBNET\Tut02\LC Solution Argent Express dans le Disque des
solutions. (L’interface peut ne pas comporter de bouton Effacer.) Réponses pour les données de test :
le total des intérêts vaut 1 761,44 et le coût total du prêt est de 10 761,44.

Tâche Objet Événement
1. Calculer le montant total des intérêts CalculerButton Click
et le coût total du prêt
2. Afficher les intérêts et les montants à
rembourser dans les contrôles
IntérêtLabel et CoûtLabel
Effacer l’écran EffacerButton Click
Terminer l’application QuitterButton Click
Afficher les intérêts et le montant total à IntérêtLabel, CoûtLabel Aucun
rembourser (par CalculerButton)
Demander et afficher le capital prêté, le PrêtTextBox, TauxTextBox, Aucun
taux d’intérêt et la durée du prêt DuréeTextBox

Pseudocode :
CalculerButton
      Calculer le coût total du prêt = - (durée * 12 * pmt(taux/12, durée * 12, capital prêté, 0, 0)).
      Calculer le montant total des intérêts = montant total à rembourser – capital prêté.
      Afficher le coût total du prêt dans le contrôle CoûtLabel.
      Afficher le montant total des intérêts dans le contrôle IntérêtLabel.
      Donner le focus au bouton EffacerButton.

EffacerButton
       Effacer le contenu de la propriété Text des contrôles PrêtTextBox, TauxTextBox et
              DuréeTextBox
       Effacer le contenu de la propriété Text des contrôles IntérêtLabel et CoûtLabel.
       Donner le focus au contrôle PrêtTextBox.

QuitterButton
       Terminer l’application.

20. (Débogage) Voir les fichiers de VBNET\Tut02\LC Solution Débogage dans le Disque des solutions.

© 2003 Éditions Reynald Goulet inc. Tous droits réservés.                                          Page 29

Tutoriel 3 – Leçon A
Questions
1. e c (constantes symboliques) et d (variables)
2. e Toutes ces réponses.
3. b Integer
4. d locale
5. a constante littérale
6. e variable
7. c constante symbolique
8. c Object
9. b la lettre m
10. a Vrai

Exercices
Pour les exercices 1 à 5, le nom de la variable et le type de donnée peuvent varier.
1. Dim strArticle As String, sngPrix As Single
2. Dim strArticle As String, sngTaille As Single, intPoids As Integer
3. Dim strArticle As String, intDébut, intAcquis, intVendus, intFin As
    Integer
4. Dim strVille As String, intPopulation As Integer
5. Private mstrNuméroPièce As String, msngCoût As Single
6. strVille = "Montréal"
7. strNuméroPièce = "AB103"
8. strNom = "Bureau"
    intStockInitial = 40
    intSurCommande = 20
9. decVentesTotales = decVentesReg1 + decVentesReg2
10. sngSalaire = sngSalaire * 1.5
11. Private mstrNomEmployé As String
    L’instruction doit être entrée dans la section Déclarations du formulaire. La variable doit avoir une
    portée de module.
12. Dim sngVentesOuest As Single
    L’instruction doit être entrée dans la procédure événementielle Click d’OuestButton. La variable est
    une variable locale.
    Dim sngVentesSud As Single
    L’instruction doit être entrée dans la procédure événementielle Click de SudButton. La variable est
    une variable locale.
    Dim msngVentesSociété As Single
    L’instruction doit être entrée dans la section Déclarations du formulaire. La variable doit avoir une
    portée de module.
13. Const conTauxTaxe As Single = .05
14. Const mconAge As Integer = 21
    L’instruction doit être entrée dans la section Déclarations du formulaire. La constante doit avoir une
    portée de module.
15. (Découverte) Voir les fichiers de VBNET\Tut03\LA Solution Statique dans le Disque des solutions.

© 2003 Éditions Reynald Goulet inc. Tous droits réservés.                                             Page 30

Tutoriel 3 – Leçon B
Questions
1. e Toutes ces réponses.
2. d &
3. a Me.MotLabel.Text = strMot1 & strMot2
4. d Me.AdresseLabel.Text = strVille & ", " & strCode
5. d vbNewLine
6. a AcceptButton
7. d de l’Explorateur d’objets
8. e sngNombre = Val(InputBox("Entrez un nombre :", "Nombre"))
9. c strVille = Inputbox("Entrez le nom de votre ville :", "Ville")

Exercices
1. Voir les fichiers de VBNET\Tut03\LB Solution Commission dans le Disque des solutions.
2. Voir les fichiers de VBNET\Tut03\LB Solution Racine carrée dans le Disque des solutions.
3. Voir les fichiers de VBNET\Tut03\LB Solution Mingo dans le Disque des solutions.
4. Voir les fichiers de VBNET\Tut03\LB Exo4 Solution IMY dans le Disque des solutions.
5. Voir les fichiers de VBNET\Tut03\LB Exo5 Solution IMY dans le Disque des solutions.
6. Me.AdresseLabel.Text = strVille & ", " & strPays
7. Me.AdresseLabel.Text = conInvite & " " & strPays & " est " &
    strVille & "."
8. Me.AddressLabel.Text = "Mon code postal est " & strCode & "."
9. (Découverte) Voir les fichiers de VBNET\Tut03\LB Solution Annuler dans le Disque des solutions.
10. (Découverte) La valeur affectée à la constante symbolique E est 2,71828. La valeur affectée à la
    constante symbolique PI est 3,14159.

Tutoriel 3 – Leçon C
Questions
1. c statique
2. d Static intCompteur as Integer
3. e TextChanged
4. a Private Sub GetNombre(ByVal sender As Object, ByVal e As
   System.EventArgs) Handles Nombre1TextBox.Click, Nombre2TextBox.Click

Exercices
1. Voir les fichiers de VBNET\Tut03\LC Solution Nom dans le Disque des solutions.
2. Voir les fichiers de VBNET\Tut03\LC Solution Sous dans le Disque des solutions.
3. Voir les fichiers de VBNET\Tut03\LC Solution Monnaie dans le Disque des solutions.
4. (Découverte) Voir les fichiers de VBNET\Tut03\LC Solution Fonction dans le Disque des solutions.
   Val("") et Val("A") renvoient le nombre 0. CType("", Integer) et CType("A", Integer) provoquent
   l’affichage d’un message d’erreur (c’est pourquoi ces lignes de code se retrouvent inscrites sous
   forme de commentaires dans le programme).

© 2003 Éditions Reynald Goulet inc. Tous droits réservés.                                       Page 31

5. (Débogage) Voir les fichiers de VBNET\Tut03\LC Solution Débogage dans le Disque des solutions.
   Pour déboguer cette solution, l’étudiant(e) doit inclure la fonction Val dans les deux fonctions
   InputBox.

© 2003 Éditions Reynald Goulet inc. Tous droits réservés.                                      Page 32

Tutoriel 4 – Leçon A
Questions
1. d sngCoût > 100 AndAlso sngCoût

Exercices
1.

2. If UCase(Me.AutoTextBox.Text) = "GRAND AM" Then
      Me.FabricantAutoLabel.Text = "Pontiac"
   End If
3. If intUnités < 0 Then
      Me.MessageLabel.Text = "Erreur d’entrée"
   Else
      Me.MessageLabel.Text = "Nombre valable"
   End If
4. If sngPrix < 10 Then
      Me.MessageLabel.Text = "Commander"
   Else
      Me.MessageLabel.Text = "OK"
   End If
5. If sngVentes

7.

   If UCase(strÉtat) = "COLORADO" Then
       Me.TaxeVenteLabel.Text = .03 * sngVentes
   Else
       Me.TaxeVenteLabel.Text = .04 * sngVentes
   End If
8. Si le nombre d’heures travaillées est supérieur à 40
       Calculer le salaire brut = heures travaillées * taux horaire + (heures travaillées - 40) * taux
       horaire/2
   Sinon
       Calculer le salaire brut = heures travaillées * taux horaire
   Fin Si
   Afficher le salaire brut
   Si sngHeures > 40 Then
       sngBrut = sngHeures * sngTaux + (sngHeures – 40) * sngTaux/2
   Else
       sngBrut = sngHeures * sngTaux
   End If
   Me.BrutLabel.Text = sngBrut

© 2003 Éditions Reynald Goulet inc. Tous droits réservés.                                                Page 35

9.

    If UCase(strAnimal) = "C" Then
        Me.AnimalLabel.Text = "Chien"
    Else
        Me.AnimalLabel.Text = "Mouton"
    End If
10. Si l’élément est un bureau et si le pays est la France
        Calculer la remise = ventes * .1
        Afficher la remise
    Fin Si

    If UCase(strElément) = "BUREAU" AndAlso UCase(strPays) = "FRANCE"
    Then
       sngRemise = sngVentes * .1
       Me.RemiseLabel.Text = Format(sngRemise, "Standard")
    End If
11. If UCase(strCouleur) = "ROUGE" AndAlso UCase(strElément) = "CHEMISE"
    Then
       sngAugmentation = .02 * sngPrixOrigine
    Else
       sngAugmentation = .01 * sngPrixOrigine
    End If
    sngNouveauPrix = sngPrixOrigine + sngAugmentation

© 2003 Éditions Reynald Goulet inc. Tous droits réservés.           Page 36

Me.OrigineLabel.Text = Format(sngPrixOrigine, "Standard")
    Me.AugmentationLabel.Text = Format(sngAugmentation, "Standard")
    Me.NouveauLabel.Text = Format(sngNouveauPrix, "Standard")
12. If sngVentesMarie < sngVentesJeff Then
       Dim sngTemp As Single
       sngTemp = sngVentesMarie
       sngVentesMarie = sngVentesJeff
       sngVentesJeff = sngTemp
    End If

Tutoriel 4 – Leçon B
Questions
1. a Lorsque vous supprimez une zone de groupe, les contrôles compris dans cette zone de groupe
    demeurent sur le formulaire.
2. d 5,0
3. e Toutes ces réponses.
4. b Pmt(.09/4, 3 * 4, 6000, 0, DueDate.BegOfPeriod)
5. b -Pmt(.03/12, 10 * 12, 0, 50000, DueDate.BegOfPeriod)
6. c icône
7. c MessageBoxIcon.Exclamation
8. a un bouton OK et l’icône
9. e Aucune de ces réponses.
10. a DialogResult.OK

Exercices
1. Voir les fichiers de VBNET\Tut04\LB Solution Épargne Hebdomadaire dans le Disque des solutions.
2. Voir les fichiers de VBNET\Tut04\LB Solution Remise dans le Disque des solutions.
3. En plus de la constante MessageBoxIcon.Exclamation, la constante
   MessageBoxIcon.Warning permet d’afficher une icône de message d’avertissement. Les
   constantes MessageBoxIcon.Asterisk et MessageBoxIcon.Information affichent une
   icône de message d’information. Par ailleurs, les constantes MessageBoxIcon.Error,
   MessageBoxIcon.Hand et MessageBoxIcon.Stop permettent d’afficher une icône de
   message d’arrêt. Enfin, la constante MessageBoxIcon.Question affiche un symbole
   représentant un point d’interrogation dans un cercle.

Tutoriel 4 – Leçon C
Questions
1. b KeyPress
2. c e.Handled = True
3. e Aucune de ces réponses.
4. b If e.KeyChar = "$" Then
5. e TextAlign

© 2003 Éditions Reynald Goulet inc. Tous droits réservés.                                     Page 37

Exercices
1. Voir les fichiers de VBNET\Tut04\LC Solution Permutation dans le Disque des solutions.
2. Voir les fichiers de VBNET\Tut04\LC Solution Mathématiques dans le Disque des solutions.
3. Voir les fichiers de VBNET\Tut04\LC Solution Séminaire dans le Disque des solutions.
4. Voir les fichiers de VBNET\Tut04\LC Solution Province dans le Disque des solutions.
5. Voir les fichiers de VBNET\Tut04\LC Solution Eau dans le Disque des solutions.
6. (Découverte) Voir les fichiers de VBNET\Tut04\LC Solution Prime dans le Disque des solutions.
7. (Découverte) Voir les fichiers de VBNET\Tut04\LC Solution Code Postal dans le Disque des
   solutions. (L’étudiant doit régler la propriété MaxLength du contrôle zone de texte.)
8. (Débogage) Voir les fichiers de VBNET\Tut04\LC Solution Débogage dans le Disque des solutions.
   Pour déboguer cette solution, l’étudiant doit inclure des parenthèses autour de e.KeyChar < "0"
   OrElse e.KeyChar > "9" dans la procédure OmettreTouches, ainsi qu’autour de intCode =
   1 OrElse intCode = 2 dans la procédure événementielle Click de CalculerButton.

© 2003 Éditions Reynald Goulet inc. Tous droits réservés.                                   Page 38

Vous pouvez aussi lire