Faire une classe Tableau

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 ?

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>

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 ?

Il faudrait lire quelques tutoriaux sur le VB.Net.

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

Citation:

---

Ç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:

---

myMatch.EquipeA

---

est plus lissible que

Code:

---

tabMatch[3]

---

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

Soit utilisé un Dictionary

Code:

---

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 ;)