Application pratique : Définition de niveaux d'accès
aux variables TP VB.Net et les fichiers - Cours Visual Basic .Net
Examinez le code de démarrage pour
rechercher une variable non déclarée
Déclarez la variable dans différents endroits
pour obtenir différents niveaux de portée
Déterminez quel modificateur d'accès
utiliser lors de la déclaration d'une variable
Leçon : Conversion des types de données
Présentation des fonctions de conversion
Conversion explicite de types de données
Mécanisme de conversion implicite de données
Présentation des fonctions de conversion
Définition : Les fonctions de conversion permettent de
convertir explicitement une valeur d'un type de données en
un autre
Valeur Integer
1234
Valeur String
"1234" CStr
Valeur Double
567,9894
Valeur Integer
568 CInt
Valeur String
"12 février 1992"
Valeur Date
#2/12/92#
CDate Cours introduction à la programmation en Visual Basic® .NET
Devient
Conversion explicite de types de données
Déclarez une variable en tant que type de données String
Dim myString As String
Convertissez la valeur String en valeur Integer
myInteger = CInt(myString)
Déclarez une autre variable en tant que type de données
Integer
Dim myInteger As Integer
Affectez une valeur à la variable String
myString = " 1234"
1
2
3
4
Exemple
Syntaxe : nomDeLaVariable =
FonctionDeConversion(Expression)
Mécanisme de conversion implicite de données TP VB.Net et les fichiers - Cours Visual Basic .Net
Les types de données sont convertis automatiquement
Aucune syntaxe spéciale n'est nécessaire dans le code
Exemple de conversion implicite de données :
Inconvénients :
Suceptibles de produire des résultats inattendus
Exécution du code ralentie
L'option Strict ne permet aucun type de conversion implicite restrictive
Dim sequence As String
Dim number As Integer
' ...
sequence = "1234"
number = sequence
' La valeur de la séquence est convertie implicitement
' en valeur Integer
Dim sequence As String
Dim number As Integer
' ...
sequence = "1234"
number = sequence
' La valeur de la séquence est convertie implicitement
' en valeur Integer
Leçon : Création et utilisation de structures
Informations connexes du groupe structure unique
Nom de l'employé
Date de naissance
Date d'embauche
Fonction
Stucture de données
Employee
Stucture de données
Employee
Présentation des structures
Types de données composites
Utilisées pour créer des types de valeurs définis par l'utilisateur
Les membres peuvent être des variables, des propriétés, des
méthodes ou des événements
Exemple de structure définie par l'utilisateur :
Public Structure Employee
Public FirstName As String
Public LastName As String
Public HireDate As Date
Public JobTitle As String
Private Salary As Decimal
End Structure
Public Structure Employee
Public FirstName As String
Public LastName As String
Public HireDate As Date
Public JobTitle As String
Private Salary As Decimal
End Structure
Exemples de structures prédéfinies : Point, Size et Color
Déclaration de structures
Dans un module, un fichier ou une classe (pas dans une procédure)
Syntaxe :
Le modificateur d’accès utilisé est :
Public pour un accès illimité
Protected pour un accès uniquement au sein de sa propre classe
Friend pour un accès à partir de n'importe quel emplacement de
l'application ou de l'assembly
Private pour un accès uniquement au sein de son contexte de
déclaration
N'affectez pas de valeurs aux membres des données dans la
déclaration
ModificateurAccès Structure nomDeLaStructure
' Déclarer les membres de la structure ici
End Structure
ModificateurAccès Structure nomDeLaStructure TP VB.Net et les fichiers - Cours Visual Basic .Net
' Déclarer les membres de la structure ici
End Structure
Procédure Procédure
Déclaration d'une structure
Déclaration d'une variable du type de la
structure déclarée
Déclaration d'une variable du type de la
structure déclarée
Affectation de valeurs aux données
membres
Affectation de valeurs aux données
membres
Écriture du code permettant d'utiliser les
membres de la structure
Écriture du code permettant d'utiliser les
membres de la structure
Utilisation de structures
Application pratique : Création et utilisation de
structures
Déclarez une structure
Déclarez une variable en tant que type de la
structure
Écrivez le code pour utiliser les membres de
la structure
Affectez des valeurs aux membres de la
structure
Exécutez et testez l'application
Leçon : Stockage de données dans des tableaux
Présentation d'un tableau
Déclaration d'un tableau unidimensionnel
Utilisation de tableaux multidimensionnels
Redimensionnement des tableaux
Présentation d'un tableau
Définition : Un tableau est une séquences d'éléments de données
Tous les éléments d'un tableau possèdent le même type de données
Les éléments individuels sont accessibles en utilisant des index d'entiers
Exemple
Pour déclarer un tableau d'entiers composé de sept éléments :
Pour accéder au troisième élément du tableau :
(6) (5) (4) (3) (2) (1) (0)
Index 0
Index 6
Dim countHouses(6) As Integer
TextBox1.Text = CStr(countHouses(2))
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)
Spécifie le nom du tableau
Spécifie le type des données
des éléments du tableau
Spécifie le niveau d'accès du tableau
ModificateurAccès NomDuTableau(Size) As Type
ModificateurAccès NomDuTableau(Size) As Type
Spécifie la taille du tableau
Utilisation des tableaux multidimensionnels
Spécifiez tous les éléments et les dimensions
Total des éléments = produit de toutes les tailles
Pour déclarer une variable de tableau multidimensionnel :
Ajoutez une paire de parenthèses après le nom de la
variable
Utilisez des virgules à l'intérieur des parenthèses pour
séparer les dimensions
Utilisez l'instruction Dim ou un modificateur d'accès au
début de la déclaration
Exemple :
Public ThreeDimensions(3,9,14) As Double
' Tableau tridimensionnel
Public ThreeDimensions(3,9,14) As Double
' Tableau tridimensionnel
Redimensionnement des tableaux
Vous pouvez redimensionner un tableau à tout moment
Utilisez l'instruction ReDim
Syntaxe :
Exemple :
ReDim tableauExistant(NouvelleGrandeur)
ReDim tableauExistant(NouvelleGrandeur)
Dim myArray(,) ' Déclarer tableau
ReDim myArray(3, 5) ' Redimensionner tableau
Dim myArray(,) ' Déclarer tableau
ReDim myArray(3, 5) ' Redimensionner tableau
Module 4 :
Utilisation de
procédures
Vue d'ensemble
Création de procédures
Utilisation de procédures
Utilisation de fonctions
prédéfinies
Debug
and Deploy
Écriture
de code
Accès
aux données
Utilisation
de Visual
Studio .NET
Débogage
et déploiement
Création
d'une
interface
Présentation des procédures
Création de procédures Sub
Création de procédures Function TP VB.Net et les fichiers - Cours Visual Basic .Net
Déclaration d'arguments dans les procédures
Utilisation d'arguments facultatifs
Réutilisation du code
Leçon : Création de procédures
Présentation des procédures
Les procédures représentent les instructions du code
exécutable dans un programme. Elles sont insérées entre
une instruction de déclaration et une instruction End
Il existe trois types de procédures :
Procédures Sub
(y compris les procédures d'événement Sub)
Procédures Function
Procédures Property
Permettent la réutilisation du code
Sont déclarées en tant que procédures publiques par défaut
Création de procédures Sub
Private Sub AboutHelp( )
MessageBox.Show("MonProgramme V1.0", "Aide de
MonProgramme")
End Sub
Private Sub AboutHelp( )
MessageBox.Show("MonProgramme V1.0", "Aide de
MonProgramme")
End Sub
[Modificateur d'accès] Sub NomDeLaProcédure _
[(Liste des arguments)]
' Instructions de la procédure Sub
End Sub
[Modificateur d'accès] Sub NomDeLaProcédure _
[(Liste des arguments)]
' Instructions de la procédure Sub
End Sub
Exemple :
Les procédures Sub effectuent des actions mais ne
renvoient pas de valeur à la procédure appelante
Création de procédures Function
Public Function DoubleTheValue(ByVal J As Double) As _
Double
. . .
Return J*2
. . .
End Function
Public Function DoubleTheValue(ByVal J As Double) As _
Double
. . .
Return J*2
. . .
End Function
[Modificateur d'accès] Function NomDeLaFonction _
[(Liste des arguments)] As TypeDeDonnées
' Instructions de la fonction, y compris l'instruction
' Return facultative
End Function
[Modificateur d'accès] Function NomDeLaFonction _
[(Liste des arguments)] As TypeDeDonnées
' Instructions de la fonction, y compris l'instruction
' Return facultative
End Function
Exemple :
Les procédures Function effectuent des actions et
peuvent retourner une valeur au programme appelant
Déclaration d'arguments dans les procédures
Les Arguments sont les données transmises aux procédures
Vous pouvez transmettre des arguments via ByVal ou ByRef
ByVal : La procédure ne peut pas modifier la valeur de la variable
d'origine
ByRef : La procédure peut modifier la valeur de la variable
d'origine TP VB.Net et les fichiers - Cours Visual Basic .Net
Exception : Les arguments non variables ne sont jamais modifiés
dans le code appelant, même s'ils sont transmis parréférence
Dans Visual Basic .NET, la méthode de transmission par défaut est
la transmission par valeur (ByVal)
Syntaxe et exemple :
([ByVal|ByRef] nomArgument As TypeDeDonnées)
([ByVal|ByRef] nomArgument As TypeDeDonnées)
(ByVal Name As String)
Utilisation d'arguments facultatifs
Règles de déclaration des arguments facultatifs :
Vous devez spécifier une valeur par défaut
La valeur par défaut doit être une expression de constante
Chaque argument qui suit un argument facultatif doit
également être facultatif
Syntaxe :
Function Add (ByVal value1 As Integer, ByVal value2As _
Integer, Optional ByVal value3 As Integer = 0) As Integer
Function Add (ByVal value1 As Integer, ByVal value2As _
Integer, Optional ByVal value3 As Integer = 0) As Integer
(Optional [ByVal|ByRef] nomArgument As _
TypeDeDonnées=valeurParDefaut)
(Optional [ByVal|ByRef] nomArgument As _
TypeDeDonnées=valeurParDefaut)
Exemple :
Réutilisation du code
[Public|Friend] Module NomDuModule
. . .
End Module
[Public|Friend] Module NomDuModule
. . .
End Module
Création d'un module :
Éléments
Éléments
Fonction
Structure
Crée des objets qui ne doivent pas être
étendus
Crée des objets qui ne doivent pas être
étendus
Exemples
Size
Point
Size
Point
Module
Fournit des fonctions d'utilitaire et des données
globales
Fournit des fonctions d'utilitaire et des données
globales
Conversion
de températures
Conversion
de températures
Classe
Étend des objets, ou pour les objets dont les
ressources doivent être nettoyées
Étend des objets, ou pour les objets dont les
ressources doivent être nettoyées
Forms
Button
Forms
Button
Application pratique : Création d'une fonction dans
un module
Ouvrez un nouveau projet
Ajoutez un nouveau module au projet
Écrivez le code de la fonction TP VB.Net et les fichiers - Cours Visual Basic .Net
Créez une fonction dans le module
Leçon : Utilisation de procédures
Utilisation des procédures Sub
Utilisation des procédures Function
Transmission de tableaux à des procédures
Création d'une procédure Sub Main
Utilisation des procédures Sub
Public Sub Hello(ByVal name As String)
MessageBox.Show("Bonjour " & Name)
End Sub
Public Sub Hello(ByVal name As String)
MessageBox.Show("Bonjour " & Name)
End Sub
Sub Test( )
Hello("John")
End Sub
Sub Test( )
Hello("John")
End Sub
Utilisation des procédures Function
Appel d'une fonction
Vous devez inclure le nom de la fonction à droite d'une
instruction d'assignation
Vous devez utiliser le nom de la fonction dans une
expression
Dim celsiusTemperature As Single
celsiusTemperature = FtoC(80)
Dim celsiusTemperature As Single
celsiusTemperature = FtoC(80)
If FtoC(userValue) < 0 Then
...
End If
If FtoC(userValue) < 0 Then
...
End If
Application pratique : Utilisation de la valeur de
retour d'une fonction
Créez l'interface utilisateur
Écrivez le code de l'application
Transmission de tableaux à des procédures
Transmettez un tableau comme vous transmettez d'autres
arguments :
Déclarez un tableau de paramètres :
Appelez une procédure comportant un tableau de paramètres :
Sub StudentScores(ByVal name As String, ByVal _
ParamArray scores( ) As String)
' Instructions de la procédure Sub
End Sub
Sub StudentScores(ByVal name As String, ByVal _
ParamArray scores( ) As String)
' Instructions de la procédure Sub
End Sub
Sub PassArray(ByVal testScores As Integer( ))
...
End Sub
Dim scores( ) As Integer = {80, 92, 73}
PassArray(scores)
Sub PassArray(ByVal testScores As Integer( ))
...
End Sub
Dim scores( ) As Integer = {80, 92, 73} TP VB.Net et les fichiers - Cours Visual Basic .Net
PassArray(scores)
StudentScores("Anne","10","26","32","15","22","16")
Création d'une procédure Sub Main
Sub Main : Point de départ de votre application
Application.Run : Démarre l'application
Application.Exit : Quitte l'application
Application pratique : Création d'une procédure
Sub Main
Déclarez des variables au niveau du
module
Créez une procédure Sub Main et
définissez-la comme objet de démarrage
Écrivez le code pour quitter l'application
Écrivez le code correspondant au
formulaire Selection
Testez l'application
Leçon : Utilisation de fonctions prédéfinies
Utilisation de la fonction InputBox
Utilisation des fonctions de date et d'heure
Utilisation des fonctions de chaîne
Utilisation des fonctions de format
Utilisation des fonctions financières
Utilisation de la fonction InputBox
Affiche une invite dans une boîte de dialogue, puis renvoie
l'entrée utilisateur sous la forme d'une chaîne
Dim FileName As String
FileName = InputBox("Veuillez entrer un nom de
fichier", "Recherche")
Dim FileName As String
FileName = InputBox("Veuillez entrer un nom de
fichier", "Recherche")
Utilisation des fonctions de date et d'heure
Effectuent des calculs impliquant des dates et des
heures
Exemples :
DateAdd : Ajoute ou retranche une durée donnée à
une date
DateDiff : Détermine le nombre de durées spécifiées
qui existent entre deux valeurs date/heure
DateAdd(DateInterval.Day, 10, billDate)
DateDiff(DateInterval.Day, Now, secondDate)
Utilisation des fonctions de chaîne
Extraient uniquement une partie d'une chaîne
Renvoient des informations concernant une chaîne
Affichent des informations dans un format donné
Exemples :
Trim
Len
Left
Length = Len(customerName)
Microsoft.VisualBasic.Left(customerName, 5)
NewString = Trim(MyString)
Utilisation des fonctions de format
Mettent en forme les nombres, les dates et les heures selon
les standards reconnus
Affichent les différents formats sans qu'il soit nécessaire de
modifier le code pour chaque nationalité ou pays
Exemples :
FormatCurrency
FormatDateTime
FormatCurrency(amountOwed, , , TriState.True,TriState.True)
FormatCurrency(amountOwed, , , TriState.True,TriState.True)
FormatDateTime(myDate, DateFormat.LongDate)
Utilisation des fonctions financières
Effectuent des calculs et réalisent des opérations liés
aux finances, tels que les taux d’intérêt
Exemples :
Pmt
Rate
payment = Pmt(0.0083, 24, -5000, 0, DueDate.BegOfPeriod)
payment = Pmt(0.0083, 24, -5000, 0, DueDate.BegOfPeriod)
ratePerPeriod = Rate(24, 228, -5000, 0, DueDate.BegOfPeriod, _
0.8)*100
ratePerPeriod = Rate(24, 228, -5000, 0, DueDate.BegOfPeriod, _
0.8)*100
Module 5 : Structures de
décision et boucles TP VB.Net et les fichiers - Cours Visual Basic .Net
Vue d'ensemble
Utilisation d’expressions
conditionnelles
Utilisation de structures de
décision
Utilisation de structures de
boucles conditionnelles
Debug
and Deploy
Écriture
de code
Accès aux
données
Utilisation de
Visual
Studio .NET
Débogage et
déploiement
Création
d’une
interface
Leçon : Utilisation d’expressions conditionnelles
Présentation des expressions conditionnelles
Utilisation d’opérateurs arithmétiques
Utilisation d’opérateurs de comparaison
Utilisation d’opérateurs logiques
Association d’opérateurs logiques et d’opérateurs de
comparaison
Présentation des expressions conditionnelles
Expressions conditionnelles :
Incluent une condition à tester True ou False
Incluent un opérateur permettant de spécifier de quel
test de la condition il s’agit
Si le mot de passe est correct, la condition est True
True
False
MotDePasseEntré
=
MotDePasseStocké
MotDePasseEntré
=
MotDePasseStocké
Utilisation d’opérateurs arithmétiques
Syntaxe :
expression1 opérateur arithmétique expression2
Dim x As Integer
x = 52 * 17
x = 120 / 4
x = 67 + 34
x = 32 – 12
x = 23 ^ 3
Dim x As Integer
x = 52 * 17
x = 120 / 4
x = 67 + 34
x = 32 – 12
x = 23 ^ 3
Exemple :
Symboles évaluant des expressions conditionnelles
Peuvent effectuer des opérations arithmétiques
Utilisation d’opérateurs de comparaison
Symboles évaluant des expressions conditionnelles et
renvoyant une valeur de type Boolean
Peuvent comparer des nombres et des chaînes
Syntaxe :
expression1 opérateur de comparaison expression2
Dim Quantity As Integer TP VB.Net et les fichiers - Cours Visual Basic .Net
Dim LargeOrder As Boolean
LargeOrder = Quantity > 1000
Dim Quantity As Integer
Dim LargeOrder As Boolean
LargeOrder = Quantity > 1000
Exemple :
Utilisation d’opérateurs logiques
Les opérateurs logiques procèdent à une évaluation
logique des expressions et renvoient une valeur de
type Boolean
Syntaxe :
expression1 opérateur logique expression2
OrderedLastMonth And OrderDelivered
OrderedLastMonth And OrderDelivered
Exemple :
Association d’opérateurs logiques et d’opérateurs
de comparaison
Vous pouvez combiner des opérateurs de
comparaison avec des opérateurs logiques à l’aide
d’instructions conditionnelles
Exemple :
LateActiveCustomer = DaysOverDue >= 60 And ActiveCustomer
LateActiveCustomer = DaysOverDue >= 60 And ActiveCustomer
Opérateurs de
comparaison
Opérateur logique
Application pratique : Évaluation d’expressions
conditionnelles
Utilisez l’application exemple pour
calculer les résultats de ces expressions :
TestString = TestString 0 And 0
TestString = Teststring -1 And 0
TestString < TestString -1 And -1
Test < TestString -1 Or -1
100 > 10 -1 Xor -1
10 < 10 -1 Xor 0
10 <= 10 0 Xor 0
Leçon : Utilisation de structures de décision
If…Then
If Ventes > 10000 Then
Prime = 0.10 *
Ventes TP VB.Net et les fichiers - Cours Visual Basic .Net
End If
If Ventes > 10000 Then
Prime = 0.10 *
Ventes TP VB.Net et les fichiers - Cours Visual Basic .Net
End If
If Ventes > 10000 Then
Prime = 0.10 * Ventes
Else
Prime = 0
Formation informatique
