Discussion :

[shayw]

Bonjour

J'ai la datastructure suivante

Code :

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

1
2
3
4
 Public Class Classworddata
    Property word As String
    Property squareindex As New List(Of List(Of Integer))
End Class

Code :

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

Private listwordsdata As New List(Of List(Of Classworddata))

listwordsdata(0) contient une liste de classworddata et chaque word a une longueur de N lettres
listwordsdata(1) contient une liste de classworddata et chaque word a une longueur de N+1 lettres
etc..

dans un datagridview contenant un nombre de colonne = différentes longueurs de mots
J'essais de copier chaque word dans la colonne approprié

Merci

[shayw]

J'ai réussi ainsi

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
Dim maxrows As Integer
        For Each item In listwordsdata
            If item.Count > maxrows Then
                maxrows = item.Count
            End If
        Next
        For iter = 0 To maxrows - 1
            DataGridresult.Rows.Add()
            For col = 0 To listwordsdata.Count - 1
                If iter < listwordsdata(col).Count Then
                    DataGridresult.Rows(iter).Cells(col).Value = listwordsdata(col)(iter).word
                End If
 
            Next
        Next