Différences entre versions de « Visual Basic .NET »

De Didaquest
Aller à la navigationAller à la recherche
Ligne 1 255 : Ligne 1 255 :
  
 
==== Propriétés ====
 
==== Propriétés ====
<p style="text-align: justify;"><span style="font-size: medium;">VB.NET est un langage orienté objet. Les éléments graphiques (les contrôles), sont des objets de classes: Par exemple, un bouton nommé "bouton1" est une instance de la Classe "System.Windows.Forms.Button". Un bouton a donc des propriétés (des caractéristiques, comme les attributs des objets vus en Java) et des méthodes prédéfinies qu'on peut utiliser. Pour chaque élément, on doit changer les propriétés des éléments. Il s'agit généralement de changer 2 propriétés principales: "nom" et "texte". Ceci se fait à partir de la fenêtre "propriétés". </span></p>
+
<p style="text-align: justify;">VB.NET est un langage orienté objet. Les éléments graphiques (les contrôles), sont des objets de classes: Par exemple, un bouton nommé "bouton1" est une instance de la Classe "System.Windows.Forms.Button". Un bouton a donc des propriétés (des caractéristiques, comme les attributs des objets vus en Java) et des méthodes prédéfinies qu'on peut utiliser. Pour chaque élément, on doit changer les propriétés des éléments. Il s'agit généralement de changer 2 propriétés principales: "nom" et "texte". Ceci se fait à partir de la fenêtre "propriétés". </span></p>
 
<p style="text-align: justify;"><span style="font-size: medium;">Chaque élément graphique a des propriétés communes avec les autres éléments, et d'autres qui lui sont spécifiques. Voici quelques propriétés communes couramment utilisées:</span></p>
 
<p style="text-align: justify;"><span style="font-size: medium;">Chaque élément graphique a des propriétés communes avec les autres éléments, et d'autres qui lui sont spécifiques. Voici quelques propriétés communes couramment utilisées:</span></p>
 +
 
<ul>
 
<ul>
<li><span style="font-size: medium;"><strong>Name</strong> : nom interne de l’objet utilisé dans le code </span></li>
+
<li><strong>Name</strong> : nom interne de l’objet utilisé dans le code </li>
<li><span style="font-size: medium;"><strong>Text</strong> :Texte affiché à l’écran (sauf pour les champs de saisie) </span></li>
+
<li><strong>Text</strong> :Texte affiché à l’écran (sauf pour les champs de saisie)</li>
<li><span style="font-size: medium;"><strong>BackColor</strong> : couleur du fond</span></li>
+
<li><strong>BackColor</strong> : couleur du fond</li>
<li><span style="font-size: medium;"><strong>Enabled</strong> : Contrôle activé ou non ▪ Font : police de caractères</span></li>
+
<li><strong>Enabled</strong> : Contrôle activé ou non
<li><span style="font-size: medium;"><strong>ForeColor</strong> : couleur de l’écriture ▪ Visible : Contrôle visible ou non</span></li>
+
▪ Font : police de caractères</li>
<li><span style="font-size: medium;"><strong> Width</strong> : hauteur de l’objet </span></li>
+
<li><strong>ForeColor</strong> : couleur de l’écriture
<li><span style="font-size: medium;"><strong>Height</strong> : largeur de l’objet </span><span style="font-size: medium;"></span><span style="font-size: medium;"></span><span style="font-size: medium;"><span style="font-size: medium;"></span></span></li>
+
▪ Visible : Contrôle visible ou non</li>
 +
<li><strong> Width</strong> : hauteur de l’objet </li>
 +
<li><strong>Height</strong> : largeur de l’objet </li>
 
</ul>
 
</ul>
 +
 
<p></p>
 
<p></p>
<p style="text-align: justify;"><span style="font-size: medium;">Pour accéder à une propriété à partir du code VB, on utilise la syntaxe suivante: </span></p>
+
 
<p style="text-align: justify; margin-left: 30px;"><span style="font-size: medium;"><b><span size="3" face="Times New Roman">NomObjet.Propriété</span></b><span size="3" face="Times New Roman"> </span></span></p>
+
Pour accéder à une propriété à partir du code VB, on utilise la syntaxe suivante:
<p style="text-align: justify;"></p>
+
    '''NomObjet.Propriété'''
<p style="text-align: justify;"><span style="font-size: medium;"><b><span size="3" face="Times New Roman">Exemples: </span></b></span></p>
+
 
<p style="text-align: justify; margin-left: 30px;"><span style="font-size: medium;"><strong><span size="3" face="Times New Roman">txtNom.Text="moi"</span></strong><span size="3" face="Times New Roman">  </span><span size="3" face="Times New Roman">→ modifier le texte de txtNom.</span></span></p>
+
'''Exemples:'''
<p style="text-align: justify; margin-left: 30px;"><span style="font-size: medium;"><strong>cmdQuitter.enabled =false</strong> → rendre le bouton désactivé. </span></p>
+
    '''txtNom.Text="moi"'''  'modifier le texte de txtNom
<p style="text-align: justify;"></p>
+
    '''cmdQuitter.enabled'''  'rendre le bouton désactivé
<p></p>
+
 
<p style="text-align: justify;"><span style="font-size: medium;">De même, pour accéder à une méthode à partir du code VB, on utilise la syntaxe suivante: </span></p>
+
De même, pour accéder à une méthode à partir du code VB, on utilise la syntaxe suivante:
<p style="text-align: justify; margin-left: 30px;"><span style="font-size: medium;"><b><span size="3" face="Times New Roman">NomObjet.Méthode ()</span></b><span size="3" face="Times New Roman"> </span></span></p>
+
    '''NomObjet.Méthode ()'''
<p style="text-align: justify;"></p>
+
 
<p style="text-align: justify;"><span style="font-size: medium;"><b><span size="3" face="Times New Roman">Exemples : </span></b></span></p>
+
'''Exemples:'''
<p style="text-align: justify; margin-left: 30px;"><span style="font-size: medium;"><span size="3" face="Times New Roman"><strong>frmPrincipale.hide ()</strong> → cacher la fenêtre, elle n'est plus visible</span></span></p>
+
    '''frmPrincipale.hide ()'''    'cacher la fenêtre, elle n'est plus visible
<p style="text-align: justify; margin-left: 30px;"><span style="font-size: medium;"><strong>frmPrincipale.show ()</strong> → rendre la fenêtre visible</span></p>
+
    '''frmPrincipale.show ()'''    'rendre la fenêtre visible
<p style="text-align: justify; margin-left: 30px;"></p>
 
  
 
====  Instructions particulières ====  
 
====  Instructions particulières ====  
 +
L'instruction '''MsgBox("Bonjour")''' permet d'afficher une fenêtre simple contenant le texte "Bonjour! " avec un bouton OK. Ceci peut se faire aussi en utilisant l'instruction suivante: '''​MessageBox.Show("Bonjour")'''. Ceci sert à simplifier au développeur la création des fenêtres simples couramment utilisées surtout pour informer l'utilisateur. On peut ajouter d'autres paramètres en fonction du besoin:
 +
    '''MessageBox.Show(​"bonjour!​", "titre"​)'''
 +
    '''MessageBox.Show(​"Bonjour! "​, "titre"​, MessageBoxButtons.OKCancel)'''
 +
    '''MessageBox.Show(​"Bonjour!"​, "titre"​, MessageBoxButtons.YesNoCancel)'''
 +
 +
    '''Dim​ reponse ​As​ ​String​ = InputBox(​"Donnez votre nom:"​, ​"titre de la fenetre"​)'''
 +
Cette instruction permet d'afficher une fenêtre pour récupérer une réponse de la part de l'utilisateur. La réponse est stockée dans la variable "reponse" de type String.
 +
 
=== Exemple Pratique ===
 
=== Exemple Pratique ===
  

Version du 21 mai 2020 à 13:49

Puce-didaquest.png Définition

Domaine, Discipline, Thématique


More-didaquest.png Justification


Définition écrite


  • Comme tous les langages .NET, VB.NET supporte pleinement les concepts orientés objets comme l'héritage. Tout est un objet, y compris les primitives (Short, Integer, Long, String, Boolean, etc.), les types, et les évènements. Tout hérite de la classe Object de base. VB.NET est une version totalement nouvelle du langage Visual Basic supportant réellement les concepts de la POO

  • La conception d’une application Visual Basic se fait initialement en construisant l’interface utilisateur en dessinant les fenêtres et en déposant les composants nécessaires au fonctionnement de l’application à l’aide de l’environnement visuel de Visual Basic. Une fois l’interface utilisateur conçue, le temps vient de spécifier les instructions que l’application doit exécuter.


More-didaquest.png Visual Basic .NET - Historique (+)


Définition graphique




Puce-didaquest.png Concepts ou notions associés


More-didaquest.png Visual Basic .NET - Glossaire / (+)



Puce-didaquest.png Exemples, applications, utilisations

Les éléments de base de VB.Net

Comme toute langage de programmation, Visual Basic .NET permet de décrire des structures des données . Il offre un ensemble de notions telles que les variables, les constantes, les tableaux, les structures de contrôles et les procédures et les fonctions, qui peuvent être utilisées comme primitives pour développer des programmes.

Variable et constante

Notion de Variable

Les variables sont nécessaires pour stocker une valeur dynamique et réutilisable. C'est en fait une simple zone mémoire qui porte un nom choisi par le programmeur. Le nom de la variable est une adresse mémoire. Il faut déclarer chaque variable en précisant le type de celle-ci. La déclaration se fait avec le mot réservé Dim.

Syntaxe:

   Dim <NomVariable> As <Type>

Pour la lisibilité du code on peut les commenter après une apostrophe ('). En ce qui concerne les noms des variables, on peut utiliser des majuscules, minuscules et chiffres. Les espaces et autres caractères spéciaux ne sont pas acceptés (accents, @, #). Le nom de la variable ne peut pas commencer par un chiffre.

Exemples:

   Dim Ma_Variable As String
   Dim Nombre As Integer

Vous pouvez affecter des valeurs aux variables une fois qu’elles sont déclarées, comme montré dans l’exemple suivant :

   Dim birthday As Date  	birthday = #3/9/1974# 
   Dim birthday As Date = #3/9/1974# 
   Dim goodNews As String = "Votre chèque est au courrier."
   Dim testCondition As Boolean = True 

Vous pouvez déclarer des variables public, comme montré dans l’exemple suivant :

   Public Ma_Variable As String

Lorsque vous créez une variable à l’aide de l’instruction Dim, Visual Basic initialise automatiquement les variables numériques sur 0, les chaînes de texte sur vide ("") et les variables de type date sur Janvier 1, 0001.

Les différents types de variables

Le langage VB utilise plusieurs types de données dont les plus utilisés sont le type String (chaîne de caractères), le type Integer (entier) et le type Single (décimal). Les types standards de données en VB sont résumés ci-dessous:

Type de variable

Mémoire occupée

Plage Utilisation principale

Boolean

2 octets

Pour les conditions

Byte

 

1 octet

Pour les fichiers

Char  

2 octets

Pour les caractères

Date

8 octets

Pour les dates

Decimal

 

16 octets

Pour les nombres décimaux

Integer

4 octets

Pour les nombres entiers

Long

8 octets

Pour les entiers longs

Short

2 octets

Pour les entiers courts

Single

4 octets

Pour les grands nombres à virgules (avec simple précision)

String

Variable

Pour les chaînes de caractères

Déclaration des constantes

Pour déclarer une constante, utilisez l’instruction Const avec la syntaxe suivante :

Syntaxe:

   Const NomConstant As Type

Exemple:

   Dim surface, rayon, périmètre As Double
   Const Pi As Double = 3.1415 
   surface = Pi * rayon ^ 2
   périmètre = 2 * Pi * rayon

Les tableaux

Un tableau est une séquence d’éléments de données appartenant à un même type. Vous pouvez accéder aux éléments individuels d’un tableau en utilisant le nom du tableau et un ou plusieurs index (commençant à 0) pour spécifier la position de l’élément dans le tableau. Un tableau peut présenter une ou plusieurs dimensions avec un ou plusieurs éléments dans chaque dimension.

Déclaration d’un tableau unidimensionnel

Vous déclarez un tableau en spécifiant les éléments suivants :     

  • Nom du tableau
  • Taille (nombre d’éléments)
  • Type de données des éléments du tableau
  • Modificateur d’accès (si nécessaire)

Syntaxe:

   ModificateurAccès NomTableau(N) As <Type>

Cette instruction déclare un tableau NomTableau de taille N+1. Pour accéder au i ème élément du tableau, il faut préciser l’indice entre parenthèses comme suit : NomTableau(i-1), i doit être compris dans l’intervalle [0, N].

Vous pouvez déclarer des tableaux locaux au moyen de l’instruction Dim et en intégrant la déclaration à l’intérieur d’une procédure. Pour créer un tableau public, utilisez le mot clé Public à la place de Dim.

Exemples de déclarations d’un tableau local:

   Sub initialisation( )
   'Allouer 31 éléments (0) à (30) 
   Dim Tab(30) As Decimal
   Dim number As Integer
   For number = 0 to 30
         Tab(number) = 100
   Next number
   End Sub

Exemples de déclarations d’un tableau public:

   Public  entiers(14) As Integer 
   Public réels(20) As Double 
   Public  entiers( ) As Integer = {1, 2, 3, 4, 5, 6, 7} 
   Public Grille ( , ) As Integer ={{1,2},{3,4}}

Déclaration de tableaux multidimensionnels

Pour déclarer une variable de tableau multidimensionnel, ajoutez une paire de parenthèses après le nom de la variable et utilisez des virgules à l’intérieur pour séparer les dimensions.

Exemple:

   Dim 2DArray(3,2) As Double
   2DArray(2,1) = 23
   2DArray(2,2) = 17 

Dans Visual Basic .NET, vous pouvez redimensionner un tableau à tout moment en lui spécifiant une nouvelle grandeur. Vous pouvez même changer le nombre de dimensions du tableau.

Syntaxe:

   ReDim tableauExistant ( NouvelleGrandeur )

Structures de contrôle

Structures conditionnelles

Forme simple

Syntaxe:

   If condition(s) Then 
       Instruction(s)
   Else 
       Instruction(s)
   End IF

Exemple:

   If Moyenne >= 12 Then 
       Admis = Admis + 1 
       Console.WriteLine (" Candidat admis ")  
   Else 
       Ajournes = Ajournes + 1 
       Console.WriteLine (" Candidat ajourné ") 
   End If

on peut utiliser IIF

Syntaxe:

   IIf (Condition, ValeurSiVrai, ValeurSiFaux) 
   

Exemple:

   Dim Note As Single
   Dim Reponse As String
   Console.Write(" Tapez votre note: ")
   Note = Console.Read()
   Reponse = IIf(Note >= 10, " Admis ", " Ajourné ")
   Console.WriteLine(Reponse)
Forme imbriqué

Syntaxe:

   If condition(s) Then 
       Instruction(s)
       If condition Then 
           Instruction(s) 
       Else If condition Then 
           Instruction(s)  
       Else condition Then 
           Instruction(s)
       End IF
   Else 
       Instruction(s)
   End IF

Exemple:

   If NombrePropose > NombreATrouver Then                                          
       Console.WriteLine("Votre nombre est trop grand !") 
   ElseIf NombrePropose < NombreATrouver Then 
       Console.WriteLine("Votre nombre est trop petit !") 
   Else 
       Console.WriteLine("Gagné !") 
   End If 
Structure à choix

Syntaxe:

   Select Case expression Case Liste_Valeurs_1 
       Instruction(s)
   Case Liste_Valeurs_2 
       Instruction(s)
   Case Else 
       Instruction(s)
   End Select 

Exemple:

   Select Case CodeASCIICaractère 
   Case 65, 69, 73, 79, 85 
       Console.WriteLine(" C’est une voyelle ") 
   Case 66 To 90 
       Console.WriteLine(" C’est une consonne ") 
   Case Else 
       Console.WriteLine(" Ce n’est pas une lettre ") 
   End Select

Structures itératives

Les instructions répétitives sont utilisées pour boucler sur une suite d’instructions.

Structure complète

Si le nombre de boucles est connu à l’avance, on utilise l'instruction ForToNext.

Syntaxe:

   For Compteur = Début To Fin [Step Incrément] 
       Instruction(s) 
   [ ... Exit For]  'pour une interruption préalable de la boucle 
       [Instruction(s)] 	
   Next [Compteur]  'le mot Compteur est facultatif 

Exemple:

   Dim i As Integer
   For i = 1 To 12
       Console.WriteLine(i * 2)
   Next i  'le i n’est pas obligatoire

On peut utiliser ForEachNext. C'est une extension de la boucle ForToNext.

Syntaxe:

   For Each Elément In Ensemble 
       Instruction(s) 
   [ ... Exit For] 
       [Instruction(s)] 
   Next [Elément] 

Exemple:

   Dim numbers() As Integer = {1, 4, 7}
   Dim letters() As String = {"a", "b", "c"}
   For Each number As Integer In numbers
       For Each letter As String In letters
           Console.Write(number.ToString & letter & " ")
       Next
   Next
Structure à condition d'arrêt
Test antérieur

La condition est ici testée au début, c'est-à-dire à l’entrée de la boucle. Avec Do whileLoop, la boucle est répétée tant que la condition est vraie. Si la condition n’est pas vraie au départ, les instructions de la boucle ne sont pas exécutées.

Syntaxe:

   Do While Condition 
       Instruction(s) 
   [... Exit Do] 
       [Instruction(s)] 
   Loop 

Exemple:

   Do While MotPropose <> MotDePasse 
       MotPropose = InputBox("Donnez votre mot de passe") 
   Loop

De même avec Do UntilLoop

Syntaxe:

   Do Until Condition 
       Instruction(s) 
   [... Exit Do] 
       [Instruction(s)] 
   Loop 

Exemple:

   Do Until MotPropose = MotDePasse 
       MotPropose = InputBox("Donnez votre mot de passe") 
   Loop
Test postérieur

La condition est ici testée à la fin de la boucle. Avec DoLoop While, la boucle est répétée tant que la condition est vraie. Les instructions de la boucle sont donc exécutées au moins une fois.

Syntaxe:

   Do 
       Instruction(s) 
   [... Exit Do] 
       [Instruction(s)] 
   Loop While Condition  
Exemple:
   Do 
       MotPropose = InputBox("Donnez votre mot de passe") 
   Loop While MotPropose <> MotDePasse 

De même avec DoLoop Until

Syntaxe:

   Do 
       Instruction(s) 
   [... Exit Do] 
       [Instruction(s)] 
   Loop Until Condition 

Exemple:

   Do 
       MotPropose = InputBox("Donnez votre mot de passe") 
   Loop Until MotPropose = MotDePasse 

Procédure et fonction

Les procédures

VB.NET permet l’utilisation des procédures et des fonctions avec ou sans paramètres. Rappelez-vous que la grande différence entre la procédure et la fonction est que cette dernière retourne une valeur lorsqu’elle est appelée.

Passage par valeur

Pour transmettre un paramètre par valeur, celui-ci doit être obligatoirement précédé par le mot réservé ByVal. Dans ce cas si la procédure appelée modifie la valeur de la variable d'origine, la valeur initiale de la variable ne change pas. Lorsque l'exécution revient à la procédure appelante, la variable contient la valeur qu'elle avait avant la transmission de la valeur.

Syntaxe:

   Private Sub NomProcédure( ByVal  argument As Type, … )  
       Instruction(s) 
   End Sub
 

Exemple:

   Private Sub Permutation(ByVal valeur1 As Integer, ByVal valeur2 As Integer)
       Dim variable As Integer  
       variable = valeur1     	
       valeur1 = valeur2     	
       valeur2 = variable  
   End Sub

L’appel de la procédure se fait soit en inscrivant Call suivi du nom de la procédure, et des paramètres à lui transmettre, soit en écrivant uniquement le nom de la procédure, suivi des paramètres à lui transmettre.

Exemple:

   Dim X, Y As Integer
   X = InputBox("Donnez 1er entier: ")
   Y = InputBox("Donnez 2ème entier: ")
   Console.WriteLine("Avant permutation  X = " & X & " et Y = " & Y )
   Call Permutation(X, Y)  
   Console.WriteLine("Après permutation  X = " & X & " et Y = " & Y )
Passage par référence

Si le paramètre est précédé par le mot réservé ByRef, la variable est transmise par référence (c à d a travers l’adresse des données en mémoire). Ainsi, toute modification de la variable locale correspondante dans la procédure se reflète sur la variable utilisée lors de l’appel.

Dans l'exemple précédant on remplace ByVal par ByRef

Les fonctions

Lors de la déclaration d'une fonction, la valeur qui doit être retournée par celle-ci doit être affectée au nom de la fonction. La déclaration de la fonction se termine par les mots réservés End function.

Syntaxe:

   Private function NomFonction( Argument As Type, … ) As Type  
       Instruction(s)
       NomFonction = RésultatDeLaFonction ‘ou bien return RésultatDeLaFonction 
   End function 
 

Exemple:

   Private function Somme( valeur1 As Integer, valeur2 As Integer ) As integer  
 	Somme = Valeur1 + valeur2  
   End function

L’appel suivant retourne la somme de X et Y et affecte le résultat à la variable Z.

Exemple:

   Dim X, Y, Z As Integer  
   X = 10   
   Y = 20  
   Z = Somme(X, Y)  


Orienté objet Visual Basic .Net

Classe et objet

Un objet est une entité qui contient des données qui définissent son état (on les appelle des propriétés) et des fonctions (on les appelle des méthodes). Un objet est créé selon un modèle qu'on appelle une classe. donc on les appellera des objets ou des instances de classes.

Exemple de classe:

   Public Class personne 
   ' attributs 
       Private prenom As String 
       Private nom As String 
       Private age As Integer 
   ' méthode 
       Public Sub initialise(ByVal P As String, ByVal N As String, ByVal age As Integer) 
           Me.prenom = P 
           Me.nom = N 
           Me.age = age 
       End Sub 
   ' méthode 
       Public Sub identifie() 
           Console.WriteLine ((prenom & "," & nom & "," & age)) 
       End Sub 
   End Class

Pour que p1 référence un objet de la classe personne, il faut écrire :

   Dim p1 as personne=new personne()

Cela a pour effet de créer un objet de type personne non encore initialisé : les attributs nom et prenom qui sont des références d'objets de type String auront la valeur nothing, et age la valeur 0. Il y a donc une initialisation par défaut. Maintenant que p1 référence un objet, l'instruction d'initialisation de cet objet suivante est valide :

   p1.initialise("Tounsi","Ali",22) 

Constructeur et destructeur

Un constructeur est une procédure qui porte le nom New et qui est appelée lors de la création de l'objet. On s'en sert généralement pour l'initialiser.

Exemple :

   Public Class personne 
   ' attributs 
       Private prenom As String 
       Private nom As String 
       Private age As Integer
   ' constructeurs 
       Public Sub New(ByVal P As String, ByVal N As String, ByVal age As Integer) 
           initialise(P, N, age) 
       End Sub 
       Public Sub New(ByVal P As personne) 
           initialise(P) 
       End Sub 
   ' méthodes d'initialisation de l'objet 
       Public Sub initialise(ByVal P As String, ByVal N As String, ByVal age As Integer) 
           Me.prenom = P 
           Me.nom = N 
           Me.age = age 
       End Sub 
       Public Sub initialise(ByVal P As personne) 
           prenom = P.prenom
           nom = P.nom 
           Me.age = P.age 
       End Sub 
   ' méthode 
       Public Sub identifie() 
           Console.WriteLine((prenom & "," & nom & "," & age)) 
       End Sub  
   End Class 

Voici un court programme de test :

   Sub Main() 
       Dim p1 As New personne("Tounsi", "Rania", 30) 
       Console.Write("p1=")
       p1.identifie() 
       Dim p2 As New personne(p1) 
       Console.Write("p2=") 
       p2.identifie() 
   End Sub 

les résultats obtenus :

   p1=tounsi,Rania,30 
   p2=tounsi,Rania,30

Un destructeur est une procédure qui est automatiquement exécutée à la mort de l'objet. Une telle procédure se nomme Finalize().

   Protected Overrides Sub Finalize( ) 
   'Peut fermer des connexions ou d’autres ressources 
	conn.Close 
   End Sub

Encapsulation

L'encapsulation est un concept important de la Programmation Orientée Objet. Il permet de rassembler des données(attributs) et des traitements(méthodes) dans une seule entité (classe) et interdit d'agir directement sur les données d'un objet sauf à l'aide des méthodes. En général, les attributs d'une classe sont déclarées privées alors que ses méthodes sont déclarées publiques.

  • Private: Un champ privé n'est accessible que par les seules méthodes internes de la classe.
  • Public : Un champ public est accessible par toute fonction définie ou non au sein de la classe.
  • Protected : Un champ protégé n'est accessible que par les seules méthodes internes de la classe

Nous rajoutons à la classe personne les méthodes nécessaires pour lire ou modifier l'état des attributs des objets.

   ' accesseurs 
       Public Function getPrenom() As String 
           Return prenom 
       End Function
       Public Function getNom() As String 
           Return nom 
       End Function 
       Public Function getAge() As Integer 
           Return age 
       End Function 
   'modifieurs 
       Public Sub setPrenom(ByVal P As String) 
           Me.prenom = P 
       End Sub  
       Public Sub setNom(ByVal N As String) 
           Me.nom = N 
       End Sub  
       Public Sub setAge(ByVal age As Integer) 
           Me.age = age 
       End Sub 

Nous testons la nouvelle classe avec le programme suivant :

   Sub Main() 
       Dim P As New personne("Tounsi", "Sami", 25) 
       Console.WriteLine(("P=(" & P.getPrenom() & "," & P.getNom() & "," & P.getAge() & ")"))
       P.setAge(30)      
       Console.WriteLine(("P=(" & P.getPrenom() & "," & P.getNom() & "," & P.getAge() & ")")) 
   End Sub

Il existe une autre façon d'avoir accès aux attributs d'une classe c'est de créer des propriétés. Une propriété Property est une méthode particulière permet de lire (get) ou de fixer (set) la valeur d'un attribut. Il est conseillé de mettre un '_' au début du nom d'un attribut privée puis une majuscule au début de chaque mot sauf le premier afin que les propriétés portent le nom des attributs primitifs. En effet, une propriété ne peut porter le même nom que l'attribut qu'elle gère pour éviter un conflit de noms dans la classe.

   ' attributs 
      Private _prenom As String 
      Private _nom As String 
      Private _age As Integer
      ...  
   ' propriétés 
       Public Property prenom() As String
       Get 
	    Return _prenom 
       End Get 
       Set(ByVal Value As String) 
           _prenom = Value 
       End Set 
       End Property  
       Public Property nom() As String 
       Get 
           Return _nom 
       End Get 
       Set(ByVal Value As String) 
           _nom = Value 
       End Set 
       End Property 
       Public Property age() As Integer 
       Get 
           Return _age 
       End Get 
       Set(ByVal Value As Integer) 
           If Value >= 0 Then 
               _age = Value 
           Else 
               Throw New Exception("âge (" & Value & ") invalide") 
           End If 
       End Set 
       End Property
       Public ReadOnly Property identifie() As String
       Get
           Return "personne(" & _prenom & "," & _nom & "," & age & ")"
       End Get
       End Property


Remarque: Dans une classe, les membres partagés (propriétés et méthodes) peuvent être appelés directement, sans passer par l'instanciation d'un objet. Le mot-clé Shared indique en effet que la propriété ou méthode ne s'appuie pas sur un objet spécifique mais bien sur la classe elle-même ce qu'on appelles méthodes et attributs de classe ou méthodes et attributs partagées

   ' attributs de classe
       Private Shared _nbPersonnes As Long = 0  
       ...
   ' constructeurs 
       Public Sub New(ByVal P As String, ByVal N As String, ByVal age As Integer)
           ' une personne de plus 
           _nbPersonnes += 1 
           Me._prenom = P 
           Me._nom = N 
           Me._age = age 
       End Sub 
       Public Sub New(ByVal P As personne) 
           ' une personne de plus 
           _nbPersonnes += 1 
           Me._prenom = P._prenom 
           Me._nom = P._nom 
           Me._age = P._age 
       End Sub
   ' propriété de classe 
       Public Shared ReadOnly Property nbPersonnes() As Long 
       Get 
           Return _nbPersonnes 
       End Get 
       End Property
   ... 

Nous testons le programme suivant :

   Sub Main() 
       Dim p1 As New personne("Tounsi", "Samir", 26) 
       Dim p2 As New personne(p1) 
       Console.WriteLine(("Nombre de personnes créées : " & personne.nbPersonnes))  
   End Sub

Surcharge

La surcharge est une technique simple à utiliser, qui permet d'utiliser le même nom de fonction avec des paramètres de différents types.

Exemple:

   Class Addition 
       Overloads  Public Sub Add(a as Integer, b as Integer) 
           Console.Writeline ("Somme de deux entiers: " + Convert.ToString(a + b)) 
       End Sub  
       Overloads  Public Sub Add(a as String, b as String) 
           Console.Writeline ("concatination de deux chaines: " + a + b) 
       End Sub 
   End Class
   
   Shared Sub Main() 
       'Créée l'objet 
           Dim monCalcul as Addition  	
           monCalcul = New Addition          
       'Appel de la première fonction
           monCalcul.Add(10, 20)    
       'Appel de la seconde fonction : 
           monCalcul.Add("Bonjour", " comment allez-vous ?")  
   End Sub 

Héritage

L'héritage est un mécanisme par lequel une classe dérivée (ou classe fille) hérite toutes les caractéristiques de sa classe de base (ou classe mère) et ajoute celles qui lui sont propres . Il suffit pour cela d'utiliser le mot-clé Inherits.

Exemple:

   Public Class enseignant Inherits  personne 
       ' attributs 
           Private _section As Integer 
       ' constructeur 
           Public Sub New(ByVal P As String, ByVal N As String, ByVal age As Integer, ByVal section 
           As Integer)  
               MyBase.New(P, N, age) 
               Me._section = section 
           End Sub  
       ' propriété section  
           Public Property section() As Integer 
           Get 
               Return _section 
           End Get  
           Set(ByVal Value As Integer) 
               _section = Value 
           End Set 
       ' surcharge propriété identifie
           Public Shadows ReadOnly Property identifie() As String 
           Get 
               Return "enseignant(" & MyBase.identifie & "," & _section & ")" 
           End Get 
       End Property 
   End Class 

Nous testons le programme suivant :

   Sub Main() 
       Console.WriteLine(New enseignant("Tounsi", "Samia", 40, 27).identifie) 
   End Sub

Polymorphisme

La notion de polymorphisme est très liée à celle d’héritage. Grâce à la redéfinition, il est possible de redéfinir une méthode dans des classes héritant d’une classe de base. Par ce mécanisme, une classe qui hérite des méthodes d’une classe de base peut modifier le comportement de certaines d'entre elles pour les adapter à ses propres besoins.

Exemple, Supposons qu’on a une classe appelée Taxe_Base, qui fournit les fonctionnalités de base pour calculer les taxes. Les classes dérivées de Taxe_Base (Taxe_Entreprise ou Taxe_Douane, par exemple) pourraient implémenter des méthodes telles que CalculerTaxe.



Programmation évènementielle Visual Basic .Net

Principe de la programmation événementielle

A part la programmation séquentielle, où les instructions s’exécutent de manière séquentielle, on peut utiliser VB.NET pour réaliser de la programmation par événements, c’est à dire programmer des procédures qui s’exécutent quand un événement est déclenché. La plupart du temps, l’événement est déclenché par l’utilisateur du programme.

  • Partie visuelle: des fenêtres, des boutons, des labels. C'est ce qui est vu par l'utilisateur final de l'application.
  • Code VB.NET "derrière" la partie visuelle. C'est au développeur de réaliser cette partie.

Exemple : Mini Calculatrice

L'utilisateur de l'application va interagir avec la fenêtre de la mini-calculatrice.

  • L'utilisateur saisi deux entiers
  • Il clique sur un bouton d'addition ou de soustraction
  • Le système affiche le résultat

la procédure événementielle générée pour un objet suit la syntaxe suivante:

   Private Sub ​NomObjet_​​NomEvénement​ (paramètres)
       Instructions
   End Sub

Généralités sur les contrôles

Contrôles standards

La partie visuelle du projet est composée principalement d'un ou de plusieurs formulaires (Forms). Un formulaire représente une fenêtre (Window). Dans ce formulaire, on va ajouter les éléments graphiques dont on a besoin.

Nom de l'élément

Utilité

Form (feuille)

 

C'est le conteneur graphique des contrôles de l'application

Label (étiquette)

Afficher un texte statique : un libellé.

Text Box

(zone de texte)

 

Rentrer une valeur saisie, on peut aussi l'utiliser pour afficher du texte mais ce n'est pas recommandé. (utiliser plutôt le label pour l'affichage)

Button (bouton de commande) 

Lancer l’exécution d'une procédure événementielle (généralement suite au click sur ce bouton)

ListBox

Afficher une liste de valeurs. 

ComboBox

Combiner l’utilité des contrôles ListBox et TextBox

PictureBox 

Afficher une image dans un cadre. (Il peut être redimensionné en fonction de l’image en utilisant Autosize = True)

RadioButton (bouton radio)

 

Sélectionner une seule option parmi plusieurs.

Check Box (case à cocher)

choisir une ou plusieurs options parmi d'autres.

GroupBox  

 

Regroupe un ensemble de contrôles graphique dans un seul cadre au sein du formulaire.

Propriétés

VB.NET est un langage orienté objet. Les éléments graphiques (les contrôles), sont des objets de classes: Par exemple, un bouton nommé "bouton1" est une instance de la Classe "System.Windows.Forms.Button". Un bouton a donc des propriétés (des caractéristiques, comme les attributs des objets vus en Java) et des méthodes prédéfinies qu'on peut utiliser. Pour chaque élément, on doit changer les propriétés des éléments. Il s'agit généralement de changer 2 propriétés principales: "nom" et "texte". Ceci se fait à partir de la fenêtre "propriétés".

Chaque élément graphique a des propriétés communes avec les autres éléments, et d'autres qui lui sont spécifiques. Voici quelques propriétés communes couramment utilisées:

  • Name : nom interne de l’objet utilisé dans le code
  • Text :Texte affiché à l’écran (sauf pour les champs de saisie)
  • BackColor : couleur du fond
  • Enabled : Contrôle activé ou non ▪ Font : police de caractères
  • ForeColor : couleur de l’écriture ▪ Visible : Contrôle visible ou non
  • Width : hauteur de l’objet
  • Height : largeur de l’objet

Pour accéder à une propriété à partir du code VB, on utilise la syntaxe suivante:

   NomObjet.Propriété

Exemples:

   txtNom.Text="moi"   'modifier le texte de txtNom
   cmdQuitter.enabled  'rendre le bouton désactivé

De même, pour accéder à une méthode à partir du code VB, on utilise la syntaxe suivante:

   NomObjet.Méthode ()

Exemples:

   frmPrincipale.hide ()    'cacher la fenêtre, elle n'est plus visible
   frmPrincipale.show ()    'rendre la fenêtre visible

Instructions particulières

L'instruction MsgBox("Bonjour") permet d'afficher une fenêtre simple contenant le texte "Bonjour! " avec un bouton OK. Ceci peut se faire aussi en utilisant l'instruction suivante: ​MessageBox.Show("Bonjour"). Ceci sert à simplifier au développeur la création des fenêtres simples couramment utilisées surtout pour informer l'utilisateur. On peut ajouter d'autres paramètres en fonction du besoin:

   MessageBox.Show(​"bonjour!​", "titre"​) 
   MessageBox.Show(​"Bonjour! "​, "titre"​, MessageBoxButtons.OKCancel)
   MessageBox.Show(​"Bonjour!"​, "titre"​, MessageBoxButtons.YesNoCancel)
   Dim​ reponse ​As​ ​String​ = InputBox(​"Donnez votre nom:"​, ​"titre de la fenetre"​)

Cette instruction permet d'afficher une fenêtre pour récupérer une réponse de la part de l'utilisateur. La réponse est stockée dans la variable "reponse" de type String.

Exemple Pratique

Puce-didaquest.png Erreurs ou confusions éventuelles



Puce-didaquest.png Questions possibles



Puce-didaquest.png Liaisons enseignements et programmes

Idées ou Réflexions liées à son enseignement



Aides et astuces



Education: Autres liens, sites ou portails




Puce-didaquest.png Bibliographie