Introduction to .NET Environment and Visual Basic.Net

(cid:1)Accès : nom_tab(i,j)

24

Les tableaux (cid:1) Les tableaux sont des objets :

(cid:1) Length (propriété) : taille du tableau (pour les tab à 2 dim,

length donne le nombre d‘éléments). x = t.Length

(cid:1) GetLength(dim) : méthode qui donne la taille de la dimension

dim d‘un tableau à plusieurs dimensions.

x = mat.GetLength(0) x = mat.GetLength(0) y = mat.GetLength(1)

(cid:1) Rank (prop) : donne le nombre de dimensions d’un tableau

nb_dim=mat.Rank (cid:1)nb_dim : 2

(cid:1) Classe Array :

(cid:1)

Ind=Array.IndexOf (tab,elt)

(cid:1) Array.Sort(tab)

25

Les tableaux (cid:1) Redimensionner un tableau : Il est possible de

redimensionner des tableaux au moment de l’exécution avec les instructions : (cid:1) Redim : Dans ce cas, toutes les anciennes valeurs seront perdues

Exemple : Redim Test(30)

(cid:1) Redim Preserve : Dans ce cas, on préserve toutes les données

Exemple : Redim Preserve Test(30) Exemple : Redim Preserve Test(30) (cid:1) Déclaration dynamique : a. Dim nom_tableau ( ) as type b. Dès qu’on saisit le nbr d’éléments et avant la 1ère utilisation du tableau :

Redim nom_tableau (nbr) as type

c. Utiliser le tableau

26

Les chaînes de caractères

(cid:1) Les chaînes de caractères sont des objets de type String.

(cid:1) Deux moyens pour manipuler les chaines:

(cid:1) Utiliser des fonctions de VB classique (déconseillé) Utiliser les propriétés et méthodes de la classe System.String: (cid:1) Utiliser les propriétés et méthodes de la classe System.String:

27

Les chaînes de caractères

Exemples: Dim ch as String = "Cours VB.net" • ch.chars(i) (cid:1)retourne ch(i) • ch.Length (cid:1)retourne la longeur de ch • ch.Substring(ind_deb,nb_car) (cid:1)retourne la souschaine de longeur

nb_car extraite à partir de l‘indice ind_deb.

• ch1.Equals(ch2) (cid:1)retourne true si ch1=ch2, false sinon • ch1.CompareTo(ch2) (cid:1)retourne un entier <0 (ch1<ch2); >0 • ch1.CompareTo(ch2) (cid:1)retourne un entier <0 (ch1<ch2); >0

(ch1>ch2); 0 (ch1=ch2). (ch1>ch2); 0 (ch1=ch2).

• ch1.Insert(pos, ch2) (cid:1)insert ch2 dans ch1 à l‘indice • ch.TrimStart( ) / ch.TrimEnd( ) / ch.Trim( )(cid:1)enlève les espaces • ch.ToUpper( ) / ch.ToLower( ) (cid:1)majuscule / minuscule • ch1.IndexOf(ch2[,ind]) (cid:1)recherche ch2 dans ch1 [à partir de

• ch.Replace(str1,str2) (cid:1)remplace dans ch toute occurence de str1

l‘indice ind]

par str2

28

Les enregistrements (structures) (cid:1) Les structures permettent de regrouper des données de différents

types

(cid:1) Déclaration :

Public Structure nom_str public champ1 as type1 public champ2 as type2 ... End structure End structure

(cid:1) Champi : variable de tout type, structure, fonction ou procédure. (cid:1) Utilisation : dim v as nom_str (cid:1) Accès aux champs d’une variable de type structure :

v.champ1=…v.champ2=... ...

(cid:1) Les structures ne sont pas des types « référence »

nom_str1=nom_str2 (cid:1)copie les champs et non pas les adresses des structures.

29

Exemple 1 : Utilisation d’une structure

1. Déclaration de la structure

2. Déclaration d’une variables de type la structure 2. Déclaration d’une variables de type la structure

déclarée

3. Affectation de valeurs aux données membres

30

Exemple 2

Private Structure employee

Public givenName As String Public familyName As String Public phoneNumber As Long Private salary As Double Public Sub giveRaise(ByVal raise As Double)

salary = raise

End Sub Public Function salaryemployee() As Double Public Function salaryemployee() As Double

Return salary

End Function

End Structure *****************************************************

Dim emp As employee emp.givenName = "Mohamed" emp.familyName = "Ben ali" emp.giveRaise(200) Console.WriteLine(CStr(emp.salaryemployee()))

31

Les opérateurs

(cid:1) Opérateur d‘affectation : = (qque soit le type) (cid:1) Les opérateurs arithmétiques :

Opérateur

Opération réalisée

+

- -

*

/

\

Mod

^

Addition

Soustraction Soustraction

Multiplication

Division

Division entière

Modulo (reste de la division entière)

Puissance

32

Les opérateurs Les opérateurs de comparaison

Opérateur Opération réalisée

Exemple

Résultat

=

<>

<

>

<=

>=

Like

Is

Égalité

inégalité

Inférieur

Supérieur

Inférieur ou égal

Supérieur ou égal

Égalité de chaînes de caractères

2=5

2<>5

2<5

2>5

2<=5

False

True

True

False

True

2>=5 False “toto” like“t*” True

Comparaison de deux variables objets O1 Is O2

True si O1 et O2 font référence au même objet

True si O1 ne fait pas référence au même objet que O2

IsNot

Comparaison de deux variables Objets

O1 IsNot O2

TypeOf... Is… Comparaison du type de la variable avec le type donné

TypeOf O1 IS Client

True si O1 fait référence à un objet céé à partir du type Client

33

Les opérateurs Les opérateurs logiques

Opérateur

Opération

Exemple

Résultat

And

Or

Xor Xor

Not

Et logique

If (test1) And (test2)

True si test 1 et test2 sont True

Ou logique

If (test1) Or (test2)

True si test 1 ou test2 est True

Ou exclusif Ou exclusif

If (test1) Xor (test2) If (test1) Xor (test2)

True si test 1 ou test2 est True True si test 1 ou test2 est True mais pas si les deux sont True

Négation

If Not test

Inverse le résultat du test

AndAlso

ET logique

If (test1) AndAlso (test2)

OrElse

Ou logique

If (test1) OrElse (test2)

Idem ‘ET logique’ mais test2 ne sera évalué que si test1 est True

Idem ‘OU logique’ mais test2 ne sera évalué que si test1 est Faux

34

Les opérateurs (cid:1) Les opérateurs de concaténation : & et + (déconseillé) (cid:1) Problèmes liés à l‘opérateur + :

(cid:1) Si les deux opérandes sont numériques, alors il y a addition. (cid:1) Si les deux opérandes sont de type String alors il y a concaténation. (cid:1) Si un opérande est numérique et le deuxième est de type String

alors un autre paramètre entre en jeu : Si le compilateur est configuré avec l’option Strict On une erreur de (cid:1) Si le compilateur est configuré avec l’option Strict On une erreur de compilation est générée.

(cid:1) Si le compilateur est configuré avec l’option Strict Off, la chaîne de

caractères est implicitement convertie en type Double puis additionnée. Si la chaîne de caractères ne peut pas être convertie en Double alors une exception est générée.

(cid:1) Pour accéder aux options de compilations :

(cid:1) Sélectionner un projet (cid:1)menu Projet (cid:1)menu Propriétés (cid:1)onglet

compiler

35

Conversion des types de données

36

Les instructions de base

(cid:1) Affichage :

(cid:1) Console.writeline(message )

(cid:1) Message : chaine de caractères entre " "

Lecture (cid:1) Lecture (cid:1) Var=Console.readline()

37

Les structures de contrôle Les structures de contrôle

38

Les structures conditionnelles 1. If condition then instruction1 ... Else Instruction j ... End If

<expressions> : <expressions> : - Entière - Réelle - Booléenne - Chaine de caractères

2. Select case <expression> 2. Select case <expression>

case val1 bloc instruction 1 case val2 bloc instruction 2 ... case Else bloc instruction else End Select

39

Les structures conditionnelles (cid:1) Exemples : Select case reponse case "oui","OUI" console.writeline("reponse

positive")

case "non","NON" console.writeline("reponse console.writeline("reponse

negative")

case else Console.writeline("reponse de

normand")

End select

Select case heure Case 8,9,10,11,12 Console.writeline("Matin") Case 13 to 18 Console.writeline("après-midi") Case 19 to 22 Case 19 to 22 Console.writeline("soir") Case is >=22 Console.writeline("nuit") Case else Console.writeline("heure

invalide")

40

End select

Les structures itératives

1. For Compteur=valeur initiale To valeur Finale [Step pas]

Bloc d‘instructions

Next

2. For each element in Collection 'Collection peut être un

tableau tableau

Bloc d‘instructions

Next

3. While condition

Bloc d‘instructions

End While

41

Les structures itératives 1. Do While condition

Bloc d‘instructions

Loop

2. Do until condition

Bloc d‘instructions

Loop Loop

3. Do

Bloc d‘instructions Loop While condition

4. Do

Bloc d‘instructions

Loop until condition

42

Procédures et fonctions Procédures et fonctions

43

Procédures

1. Procédure [Static] [Private | Public] Sub nom_Sub ([Liste_paramètres])

Bloc d’Instructions

End Sub

(cid:1) Appel :

nom_sub [p1, p2, ..., pn]

Ou

Call nom_sub ([p1, p2, ..., pn])

44

Fonctions

2. Fonction [Static] [Private | Public] Function nom_function

([Liste_paramètres]) As type Bloc d’instruction return res ‘ou bien nom_function = var

End Function End Function

(cid:1) Appel : varRes = nom_fonction ([p1, p2, ..., pn])

45

Passage de paramètres (cid:1) Pour chaque paramètre d’une fonction ou procédure,

il faut spécifier : (cid:1) Le mode de passage (par valeur ou par référence) (cid:1) Le nom (cid:1) Le type

(cid:1) Mode de passage de paramètres par valeur : ByVal (cid:1) Mode de passage de paramètres par référence : ByRef

(cid:1) Par défaut : c’est ByVal (cid:1) Exemple :

public Sub minMaxTab (ByVal T( ) as integer, ByRef min as integer, ByRef

max as integer)

... End sub

46

Procédures événementielles

(cid:1) Les procédures événementielles indiquent :

(cid:1) L’élément de la feuille (form) déclenchant l’événement (cid:1) L’événement déclencheur (cid:1) Les actions (le code) à faire lorsque l‘événement est déclenché

(cid:1) Sa syntaxe :

Private Sub cmdOK_Click (ByVal sender As Private Sub cmdOK_Click (ByVal sender As

System.Object, ByVal e As System.EventArgs)

Handles cmdOK.Click 'Corps de la procédure événementielle End Sub

(cid:1) L’exécution de la procédure se fera automatiquement quand

l’utilisateur clique sur le bouton ayant la propriété name=cmdOK.

47

Boîtes de dialogue Boîtes de dialogue

48

Boîte de saisie

(cid:1) Permet à l’utilisateur de saisir une chaîne de caractères. (cid:1) InputBox : 3 paramètres:

(cid:1) Texte dans la boite (la question à afficher à l‘utilisateur) (cid:1) Le titre de la boîte (cid:1) Valeur par défaut du texte (cid:1) Exemple : Dim resultat as String

resultat = InputBox("Veuillez saisir votre nom", "identification", "votre nom")

Si Cancel alors resultat (cid:2)chaine vide

49

Boîte de message (cid:1) Permet d’afficher une information à l’utilisateur en lui donnant la possibilité de répondre (par des boutons).

(cid:1) MessageBox.show : 3 paramètres:

(cid:1) Texte dans la boite (Le message ou question à afficher à

l’utilisateur)

(cid:1) Le titre de la boîte (cid:1) Le titre de la boîte (cid:1) Les boutons à mettre dans la boite :

(cid:1) MessageBoxButtons.OK |OKCancel | AbortRetryIgnore |

YesNOCancel | YesNo | RetryCancel

(cid:1) L‘icône de la boîte :

(cid:1) MessageBoxIcon.Information|Exclamation|Error|Question|Hand

(cid:1) Bouton par défaut :

(cid:1) MessageBoxDefaultButton.Button1|Button2|Button3

50

Boîte de message Dim rep As Integer rep=MessageBox.Show("Voulez vous enregistrer en quittant l’application", "Fin de programme", MessageBoxButtons.YesNoCancel, _ MessageBoxIcon.Question,MessageBoxDefaultButton.Button1)

(cid:1) rep recevra : DialogResult.OK| DialogResult.Cancel |

DialogResult.Abort | … DialogResult.Abort | … (cid:1) 1 si OK (cid:1) 2 si Cancel (cid:1) 3 si Abort (cid:1) 4 si Retry (cid:1) 5 si Ignore (cid:1) 6 si Yes (cid:1) 7 si No

51

Chapitre 3 Chapitre 3

Les contrôles de Visual basic.Net

52

Les contrôles VB.Net (cid:1) Les contrôles permettent de créer les interfaces (feuilles, formulaires)

d‘une application.

(cid:1) Chaque contrôle est représenté par une classe (cid:1) Les contrôles sont accessibles via la boîte à outils (cid:1) La majorité des contrôles dérivent de la classe Control (cid:1) Quelques propriétés héritées :

(cid:1) Position et taille : (cid:1) Position et taille :

ctrl.left|top|width|height=int 'ou bien ctrl.location=new Point(int,int) ' left,top 'ctrl.size=new Size(int,int) ' width,height

(cid:1) Apparence :

ctrl.backcolor=System.Drawing.color.Yellow ctrl.forecolor=System.Drawing.color.Yellow ctrl.font = New Font(System.Drawing.FontFamily.Genericserif,

16)

ctrl.backgroundImage = new Bitmap("open.bmp")

53

Les contrôles VB.Net

54

Les familles de contrôles

(cid:1) Contrôles d‘affichage

(cid:1)

label, linkLabel, toolTip, errorProvider, notifyIcon, helpProvider, progressBar

(cid:1) Contrôles d’édition de texte

(cid:1)

textBox, maskedTextBox, richTextBox (cid:1) Contrôles de déclenchement d’actions (cid:1) Contrôles de déclenchement d’actions

(cid:1) button, menuStrip, contextMenuStrip, toolStrip, toolStripContainer

(cid:1) Contrôles de sélection

(cid:1)

checkbox, radioButton, listBox, numericUpDown, trackBar, domainUpDown, chekckedListBox, comboBox, treeView, listView

(cid:1) Contrôle de regroupement

(cid:1)

groupbox, panel, tabControl, splitContainer, flowLayoutPanel, tableLayoutPanel

55

Les familles de contrôles

(cid:1) Contrôles graphiques (cid:1) pictureBox, ImageList

(cid:1) Contrôles de gestion du temps

(cid:1) dateTimePicker, monthCalendar, timer, backgroundWorker,

56

Propriétés des contrôles

(cid:1) La définition des propriétés des objets utilisés dans l’interface = affectation des valeurs aux propriétés des contrôles utilisés dans cette interface.

(cid:1) La fenêtre "Propriétés" permet de réaliser cette tâche de manière facile réaliser cette tâche de manière facile (mode création)

(cid:1) Il est possible de modifier les valeurs des propriétés en mode exécution (par du code source).

57

Propriétés des contrôles (cid:1) Chaque contrôle possède une propriété NAME (cid:1) On prend comme convention: préfixer les noms des contrôles

par 3 lettres qui permettent de reconnaître son type : (cid:1) Form : frm (cid:1) CommandButton : cmd (cid:1) CheckBox : chk (cid:1) Label : lbl (cid:1) Label : lbl (cid:1) Menu : mnu (cid:1) OptionButton : opt (cid:1) TextBox : txt (cid:1) ComboBox : cmb (cid:1) ListBox: lst (cid:1) Frame: fra (cid:1) Etc.

58

Les contrôles d’affichage (cid:1) Label

(cid:1) name : lbl… (cid:1)

text : contenu (ce qui est affiché)

(cid:1) autosize : (T,F) détermine si le contrôle doit être automatiquement

redimensionné pour s’adapter au contenu. font (en mode création)

(cid:1)

ou (en mode exécution)

lblNom.font.bold lblNom.font.size lblNom.font.name lblNom.font.italic etc.

59

Les contrôles d’affichage

(cid:1) LabelLink

(cid:1) name : lnk… (cid:1) Hérite toutes les

propriétés du contrôle label

(cid:1) Permet de gérer des (cid:1) Permet de gérer des

liens

(cid:1) LinkArea : la partie du label qui activera le lien

(cid:1) Evt : linkClicked ( )

60

Les contrôles d’affichage

(cid:1) ToolTip (cid:1) Contrôle invisible : permet d’ajouter à chaque contrôle de la feuille une propriété tooltip sur tooltipx (texte de l’info-bulle)

(cid:1) name : tlp… (cid:1) AutoPopDelay : durée d‘affichage de l‘infobulle en ms.

61

Les contrôles d’affichage

(cid:1) ErrorProvider (cid:1) Contrôle invisible : utile lors de la validation des données

d‘un formulaire (cid:1) name : err… (cid:1) Il faut appeler la méthode SetError en spécifiant le nom (cid:1) Il faut appeler la méthode SetError en spécifiant le nom

du contrôle qui pose problème et le texte affiché de l’infobulle associée au contrôle.

(cid:1) S’il n’y a pas d’erreur, il faut réinitialiser le texte pour faire disparaître l’icône du contrôle ErrorProvider.

62

Les contrôles d’affichage

(cid:1) Exemple :

If Not IsNumeric(TextBox1.Text) Then errP1.SetError(TextBox1, " Valeur numérique Obligatoire ") Else errorP1.SetError(TextBox1, "") End If End If

63

Les contrôles d’édition de texte (cid:1) TextBox

(cid:1) Permet la saisie d‘information (cid:1) name : txt… (cid:1)

text : le texte dans la zone de texte

(cid:1) Autosize (T|F) (cid:1) maxlength : longueur max du texte (cid:1) passwordChar : spécifie un caractère pour cacher le texte passwordChar : spécifie un caractère pour cacher le texte (cid:1) characterCasing : normal|upper|lower (cid:1) multiline : (T|F) texte sur une seule ou plusieurs lignes (cid:1) wordwrap (T|F): indique si le retour à la ligne se fait

automatiquement lorsqu‘on atteint la fin de la zone de texte multiligne scrollbars : none|horizontal|vertical|both : affiche des barres de défilement dans la zone de texte multiligne selectedText : récupère le texte sélectionné

(cid:1)

(cid:1)

64

Les contrôles d’édition de texte

(cid:1) MaskedTextBox

(cid:1) Permet la vérification automatique des informations saisies (cid:1) name : mtxt… (cid:1) Mask : détermine le format des infos qui vont être saisies : on peut choisir un mask existant ou configurer son propre mask.

65

Les contrôles d’édition de texte (cid:1) Caractères spéciaux

(cid:1) 0 : un chiffre obligatoire (0 à 9) (cid:1) 9 : un chiffre ou un espace optionnel (cid:1) L : une lettre obligatoire (de a à z ou A à Z). (cid:1) ? : une lettre optionnelle. (cid:1) C : un caractère quelconque (cid:1) . : le séparateur décimal (cid:1) , : le séparateur des milliers (cid:1) , : le séparateur des milliers (cid:1) : : le séparateur horaire (cid:1) / : le séparateur de date (cid:1) $ : le symbole monétaire (cid:1) < les caractères suivants seront transformés en minuscules. (cid:1) > les caractères suivants seront transformés en majuscules (cid:1) | annule l’effet des deux caractères > et < (cid:1) \ caractère d’échappement faisant perdre sa signification spéciale au caractère

suivant

(cid:1) Tous les autres caractères sont affichés tels qu‘ils sont dans le contrôle.

66

Les contrôles de déclenchement d’actions

(cid:1) Button

(cid:1) name : cmd… (cid:1) text : le texte du bouton de commande (cid:1) enabled : (T|F) indique si le bouton est activé ou pas. (cid:1) visible : (T|F) (cid:1) Les propriétés acceptButton et cancelButton d‘un Les propriétés acceptButton et cancelButton d‘un formulaire (objet form): (cid:1) Pour associer la touche Enter à un click d’un bouton cmdB1 (cid:1)

acceptButton (cid:2)cmdB1

(cid:1) Pour associer la touche Esc à un click d’un bouton cmdB2

(cid:1)cancelButton (cid:2)cmdB2

67

Les contrôles de déclenchement d’actions

(cid:1) MenuStrip

(cid:1) name : mnu… (cid:1) Permet de créer des menus avec des sous-menus

(cid:1) ShortCutKeys

68

Les contrôles de déclenchement d’actions

(cid:1) ToolStrip

(cid:1) name : tls… (cid:1) Permet de créer une barre d‘outils. (cid:1) Contient un assistant pour générer automatiquement une barre d’outils avec toutes les fonctionnalités de base d’une application. application.

(cid:1)cliquer sur la petite flèche présente sur la droite du contrôle

et choisir l’option Ajouter des éléments standard.

(cid:1)Pas de code généré pour les clicks sur ces différents boutons: il

faut écrire le code.

69

Les contrôles de sélection

(cid:1) Checkbox (choix multiple)

(cid:1) name :chk… (cid:1) text : le texte affiché à coté de la case (cid:1) checked : (T|F) indique l’état de la case à cocher (T:

sélectionnée)

(cid:1) threeState : (T|F) T: la case possède 3 états (sélectionnée, (cid:1) threeState : (T|F) T: la case possède 3 états (sélectionnée,

non sélectionnée, indéterminé)

70

Les contrôles de sélection

(cid:1) RadioButton (choix exclusif)

(cid:1) name :opt… (cid:1) text : le texte affiché à coté de l‘option (cid:1) checked : (T|F) indique l’état de la case à cocher (T:

sélectionnée)

NB. Si on avait un autre ensemble de boutons radio concernant NB. Si on avait un autre ensemble de boutons radio concernant l‘étage(rdc, 1er Et, 2ème Et), il faut les placer dans un contrôle Panel pour pouvoir sélectionner le nombre de pièces et l‘étage simultanément.

71

Les contrôles de sélection (cid:1) ListBox

(cid:1) name : lst… (cid:1) Liste à choix multiples (cid:1) Les éléments de la liste sont des chaînes de caractères. (cid:1)

items: permet de remplir la liste (les éléments constituent une collection appelée Items) sorted : (T|F) liste triée ou pas sorted : (T|F) liste triée ou pas selectionMode : (none|one|multiSimple|multiExtended)

(cid:1) (cid:1)

(cid:1)

(cid:1) Méthodes :

(cid:1)

(cid:1)

(cid:1)

(cid:1)

(cid:1)

lstNbPieces.items.add("s+0") lstNbPieces.items.insert(ind,element) lstNbPieces.items.removeAt(ind) lstNbPieces.items.clear() ind=lstNbPieces.findString("elt")

72

Permet d‘utiliser les touches shift et Ctrl pour la sélection

Les contrôles de sélection (cid:1) ListBox (cid:1) Dans le cas d’une sélection simple (one):

(cid:1)

(cid:1)

selectedIndex : retrourne l’indice de l‘élément sélectionné de la collection Items selectedItem: retrourne l’élément sélectionné de la collection Items

Dans le cas d‘une sélection multiple : (cid:1) Dans le cas d‘une sélection multiple : (cid:1)

selectedIndices: retourne une collection contenant les indices des éléments sélectionnés. slectedItems: retourne une collection contenant les éléments sélectionnés.

(cid:1)

(cid:1)Il faut parcourir les listes pour avoir les éléments:

Dim o As Object For Each o in lstNbPieces.SelectedItems System.Console.WriteLine(o) Next

73

Les contrôles de sélection (cid:1) CheckedListBox

(cid:1) Amélioration du contrôle listBox (cid:1) Les cases sont cochées indépendamment de la sélection (cid:1) Récupération des cases cochées: collection checkedItems For Each elt In CheckedListBox1.CheckedItems Console.WriteLine(elt.ToString) Next Next

Ou bien

For i = 0 To CheckedListBox1.Items.Count - 1 If CheckedListBox1.GetItemChecked(i) = true Then Console.WriteLine(CheckedListBox1.Items(i)) End If Next

74

Les contrôles de sélection (cid:1) ComboBox

(cid:1) name : cmb… (cid:1) Liste à choix unique (cid:1) Association entre listBox et textBox : l’utilisateur peut choisir ou

simple

saisir une option.

(cid:1) dropDownStyle : (simple|dropDown|dropDownList)(cid:1)indique le

mode de fonctionnement du comboBox mode de fonctionnement du comboBox (cid:1) Simple : liste affichée en permanence: l‘utilisateur choisit ou saisit une

valeur

(cid:1) Dropdown : liste affichée à la demande (cid:1) Dropdownlist : l‘utilisateur ne peut plus saisir text : pour récupérer la valeur choisie ou saisie selectedIndex : l‘indice de l’élément sélectionné (cid:1) -1 quand l‘utilisateur saisit une valeur

dropdown

(cid:1)

(cid:1)

75

Les contrôles de sélection

(cid:1) TreeView

(cid:1) name : trv… (cid:1) Affichage d’éléments sous une forme arborescente (cid:1) nodes : collection qui contient tous les nœuds du 1er niveau.

Chaque nœud dispose aussi d‘une collection nodes qui contient ses nœuds enfants, etc. contient ses nœuds enfants, etc.

76

Les contrôles de sélection (cid:1) TreeView

(cid:1)

Editeur treeView

(cid:1) Avec du code :

Dim noeud, noeud2 As TreeNode noeud = New TreeNode("Twingo") noeud2 = New TreeNode("307") TreeView1.Nodes(1).Nodes.Add(noeud) 'ajoute twingo sous Renault TreeView1.Nodes(0). Nodes.RemoveAt(0) 'supprime la 206 TreeView1.Nodes(0). Nodes.insert(0,noeud2) 'insère 307 sous Peugeot

77

Les contrôles de sélection

(cid:1) TreeView

(cid:1) Quand on travaille avec treeView, on a besoin de savoir sur quel élément l’utilisateur a cliqué(cid:1)événement afterSelect

Private Sub TreeView1_AfterSelect (ByVal sender As System.Object, ByVal e As _ System.Windows.Forms.TreeViewEventArgs) Handles TreeView1.AfterSelect

Select Case e.Node.Text Case "Peugeot" System.Console.WriteLine("Peugeot") Case "Renault" System.Console.WriteLine("Renault") Case "Opel" System.Console.WriteLine("Opel") End Select

End Sub

78

Exemple : Lister le contenu d’un répertoire

Public Class Form3

Private Sub TV_AfterExpand (ByVal sender As Object, ByVal e As System.Windows.Forms.TreeViewEventArgs)

Handles TV.AfterExpand

Dim tn As TreeNode

For Each tn in e.Node.Nodes

Explorer(tn)

Next

End Sub

Private Sub Explorer (ByVal n As TreeNode) Private Sub Explorer (ByVal n As TreeNode)

Dim s As String

n.Nodes.Clear()

For Each s in Directory.GetDirectories(n.FullPath)

n.Nodes.Add(Path.GetFileName(s))

Next

End Sub

Private Sub btnAfficher_Click (ByVal sender As System.Object, ByVal e As System.EventArgs) Handles

btnAfficher.Click

TV.Nodes.Add("C:\")

Explorer(TV.Nodes.Item(0))

End Sub End Class

79

Les contrôles de regroupement

(cid:1) GroupBox

(cid:1) Permet le regroupement logique et visuel

de contrôles

(cid:1) Possède une bordure et une légende

(propriété Text) (cid:1) Permet d’isoler des groupes de radioButtons Permet d’isoler des groupes de radioButtons

(cid:1) Panel

(cid:1) Même principe que GroupBox mais sans légende et invisible

(par défaut)

(cid:1) borderStyle : (none|fixedSingle|fixed3D)

80

Les contrôles de regroupement

(cid:1) TabControl

(cid:1) Permet l‘utilisation des onglets (tabs) (cid:1) Chaque onglet est considéré comme une feuille à part sur laquelle on peut placer nos contrôles. tabpages : collection qui contient tous les onglets du contrôle. du contrôle.

(cid:1)

Editeur tabPages

81

Les contrôles graphiques

(cid:1) PictureBox

(cid:1) Permet l‘utilisation des images (bmp, gif, ico, wmf, jpg) Image (prop.) : indique le contenu du contrôle (cid:1)

(cid:1) Avec le code : PictureBox1.Image = Image.FromFile("titi.gif") PictureBox1.Image = nothing 'pour supprimer l‘image PictureBox1.Image = nothing 'pour supprimer l‘image

Editeur PictureBox

82

Les contrôles graphiques

(cid:1) ImageList

(cid:1) Permet de stocker des images (bmp, gif, ico, jpg) (cid:1) Contrôle invisible au moment de l‘exécution (cid:1) Le contrôle sera utilisé avec tout contrôle possédant une propriété

ImageList, smallImageList ou largeImageList ( ListView,TreeView) Pour ces contrôles, la propriété imageIndex indique l‘indice de l‘image (cid:1) Pour ces contrôles, la propriété imageIndex indique l‘indice de l‘image (dans