Exercice VB: Manipulation des Tableaux

Rédigé par GC Team, Publié le 01 Janvier 2012, Mise à jour le Vendredi, 16 Décembre 2022 23:02
Participez au vote ☆☆☆☆☆★★★★★

Objectif :

Travailler avec les Tableaux

Travail à Faire :

Ecrire le code en VB qui permet de :

  1. Créer un le Tableau T (0, 10, 20, 30)
  2. Créer le Tableau suivant :

0

5

1

7

8

4

-6

12
  1. rassembler deux Tableaux

 

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38

' directives
Option Strict On
Option Explicit On
' imports
Imports System
' classe de test
Module test
    Sub main()
        ' un tableau à 1 dimension initialisé
        Dim entiers() As Integer = {0, 10, 20, 30}
        Dim i As Integer
        For i = 0 To entiers.Length - 1
            Console.Out.WriteLine("entiers[" & i & "]=" & entiers(i))
        Next
        ' un tableau à 2 dimensions initialisé
        Dim réels(,) As Double = {{0.5, 1,7}, {8.4, -6,12}}
        Dim j As Integer
        For i = 0 To entiers.Length - 1
            Console.Out.WriteLine("entiers[" & i & "]=" & entiers(i))
        Next
        ' un tableau°de tableaux
        Dim noms()() As String = New String(3)() {}
        ' initialisation
        For i = 0 To noms.Length - 1
            noms(i) = New String(i) {}
            For j = 0 To noms(i).Length - 1
                noms(i)(j) = "nom" & i & j
            Next
        Next
        ' affichage
        For i = 0 To noms.Length - 1
            For j = 0 To noms(i).Length - 1
                Console.Out.WriteLine("noms[" & i & "][" & j & "]=" & noms(i)(j))
            Next
        Next
        Console.ReadLine()
    End Sub
End Module