VB.Net: Correction des exercices tableaux et matrices 8
- Enoncé Exercice 8
- Buts:
- Cet exercice a pour but de vérifier les points techniques suivants :
- Déclaration et initialisation de tableaux en VB.Net.
- Affichage des éléments du tableau
- Parcourir des tableaux en VB.Net.
- Cet exercice a pour but de vérifier les points techniques suivants :
- Rappel
- Types tableau en VB.Net
- Tableaux statiques: Taille et contenu fixés à la compilation
- Déclaration: Dim identifiant(dimension)As type = {énumération des valeurs,…};
- Tableaux dynamiques: Taille et valeurs définies à l’exécution
- Quand la taille exacte d’un tableau n’est pas connue, il est possible de créer des tableaux sans
spécifier leurs dimensions. IL s’agit alors de tableaux dynamiques
- Déclaration: Dim nom_de_variable() As type_de_donnée
- Initialisation: Dim nom_de_variable = new type_de_donnée (taille);
- Quand la taille exacte d’un tableau n’est pas connue, il est possible de créer des tableaux sans
spécifier leurs dimensions. IL s’agit alors de tableaux dynamiques
- Tableaux statiques: Taille et contenu fixés à la compilation
- Tableau à 2 dimensions en VB.Net
- Un tableau à deux dimensions se déclare de la manière suivante : Dim nom(,) As type = new type(n, m); où n est le nombre de lignes et m le nombre de colonnes.
- Boucles en VB.Net
- Une boucle est une instruction, ou un ensemble d'instructions, qui sont répétées un nombre spécifié de fois ou jusqu'à ce qu'une condition soit rencontrée.
- Le type de boucle que vous utilisez dépend de votre tâche de programmation et de vos préférences personnelles en matière de codage.
- Le langage VB.Net se distingue essentiellement d'autres langages (comme C++) par la boucle foreach, qui est conçue pour simplifier l'itération sur les tableaux ou les collections.
- Types tableau en VB.Net
- Correction Exercice 8
Module exercice8
Dim tableau As Integer() = New Integer(19) {}
Sub Main(args As String())
remplirTableau()
AffichageTab()
RechercheTableau()
End Sub
Private Sub remplirTableau()
Dim rnd As New Random()
' affectation de valeurs entières, pris au hasard entre 1 et 100, au tableau
For i As Integer = 0 To 19
tableau(i) = rnd.Next(1, 101)
Next
End Sub
Private Sub AffichageTab()
'affichage des valeurs du tableau
For i As Integer = 0 To 19
Console.WriteLine(tableau(i) & " ")
Next
End Sub
Private Sub RechercheTableau()
Dim entier As Int16 = 0
Dim indice As Integer = 0
Dim EntierTrouve As [Boolean] = False
System.Console.WriteLine("Saisir un entier")
entier = Convert.ToInt16(System.Console.ReadLine())
'Recherche de l'entier saisie dans le tableau
For i As Integer = 0 To 19
If tableau(i) = entier Then
EntierTrouve = True
indice = i
End If
Next
If EntierTrouve = True Then
Console.WriteLine("La valeur {0} est dans la case : {1}", entier, indice)
Else
Console.WriteLine("La valeur {0} n'est pas dans le tableau", entier)
End If
End Sub
End Module