Datatable en matrice 2d

Commenter

Contenu du snippet

Je dépose cette petite source toute simple car je viens de trouver cette astuce pour extraire
les données d'un DataTable sans passer par un DataGridView.

Source / Exemple : 


Private Function DataTable_ToMatrice(ByVal Table As DataTable) As String(,)
        'Auteur: CGSI3 But: Donne la Matrice 2D (en String) de la DataTable
        Dim Mat As String(,)
        Dim Row As DataRow, X As Integer, Y As Integer = -1
        ReDim Mat(Table.Rows.Count - 1, Table.Columns.Count - 1)
        For Each Row In Table.Rows
            Y = Y + 1 : X = 0
            For Each PIc In Row.ItemArray
                Mat(Y, X) = PIc.ToString : X = X + 1
            Next
        Next
        Return Mat
    End Function

Conclusion :


C'était si simple ...

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (CGSI3)