Discussion :

[domf40]

Bonjour,

Je manipule beaucoup de tableaux à plusieurs dimensions et je voudrais changer la définition de ces tableaux en classe.

Par exemple, j'ai défini un match decomposée en :
Numero_match(journee,nbr_match)
EquipeA(journee,nbr_match)
EquipeB(journee,nbr_match)
ScoreA(journee,nbr_match)
ScoreB(journee,nbr_match)

J'ai besoin de retrouver pour une journée donnée les informations de chaque macth ou d'un match particulier.

Je ne sais pas s'il je dois continuer à utiliser des tableaux ou si je dois créer une classe Match.

Quelqu'un peut il m'aider ?

[BenoitM]

On est en Orienté objet

donc oui il faut cree une classes Match

ensuite en fonction des besoin tu peux creer une classes Journéee qui contient une List<Match> lstMatch
(List(Of Match)
ou cree une Dictionary<Date,List<Match>

[domf40]

Bonjour,

Merci de m'avoir répondu :

Donc si je comprend bien, si je fait un module de classe Match en vb6.

J'ajoute les champs tel que :

Journee as integer
Numero_match as integer
EquipeA as string
EquipeB as string
ScoreA as integer
ScoreB as integer

en les déclarant avec des let et get.

Mais pour retrouver un match particulier pour une journée déterminée, je pense que je dois créer une collection afin de pouvoir me positionner sur un match particulier.
Ça me parait plus compliquer que si c'est champs sont sous la forme de tableau, non ?

[BenoitM]

Il faudrait lire quelques tutoriaux sur le VB.Net.

On ne parle plus de module mais de classes
(un module est une classe static)

Ça me parait plus compliquer que si c'est champs sont sous la forme de tableau, non ?

Non c'est beaucoup plus simple.
Vous aurez l'intellisence , les champs seront accecible via leurs nom et non un Index.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

myMatch.EquipeA

est plus lissible que

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

tabMatch[3]

Ensuite comme j'ai dis vous avez 2 solution soit creer une classe Journee.

Soit utilisé un Dictionary

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
Private Sub TestMethod()
Dim Championat As Dictionary(Of int, List(Of Match) = New Dictionary(Of int, List(Of Match)
Dim lstMatch As List(Of Match) = new List(Of Match)
lstMatch.Add(CreateNewMatch())
lstMatch.Add(CreateNewMatch())
Championat.Add(1,lstMatch)
Dim lstMatch As List(Of Match) = new List(Of Match)
lstMatch.Add(CreateNewMatch())
Championat.Add(2,lstMatch)
AfficheJournee(1,championat)
End Sub
Private Sub AfficheJournee(jour As Integer,Championat As Dictionary(Of int, List(Of Match) championat )
If Not championat.ContainsKey(journee) Then
 // Pas de journee
 Return
Else
For Each Match unMatch in  championat(journee)
Afficher(unMatch)
Next
 
End Sub

ps c'est du pseudo code pour vous donner une idée, et je ne programme pas en VB.Net mais en C# donc il y surement un tas d'erreurs