instancier un datatable en vb.net

Question

je travail sous visual studio , je veux utiliser un datatable pour faire un traitement dans mon code, mais je reçoi l'erreur suivante:
object reference not set to an instance of an object
meme si je fait new datatable
voilà mon code de test:
dim d as datatable = new datatable
d(0)(1)="a"
textbox.text=d(0)(1)
d'aprés vous quel est la solution?

cs_ssefyou · Answer

SALAM,

pour remplire un datatable je crois que tu doit creer des objets de type DataColumn , puis les ajouté a ta DataTable ensuite creer un object
Row (ligne) qui aura la meme structure de ta datatable puis remplire la ligne avec tes données
ensuite l'ajouté la ligne dans la datatable 

Exemple : 


 'creation de ma DATATABLE
        Dim Matable As New DataTable

        'creation de mes DATAColumn
        Dim Col1 As New DataColumn("Num")
        Dim Col2 As New DataColumn("Nom")
        Dim Col3 As New DataColumn("Age")

        'Ajout des column as la collection columns de ma datatable
        Matable.Columns.Add(Col1)
        Matable.Columns.Add(Col2)
        Matable.Columns.Add(Col3)

        'creation d'une ligne
        Dim ligne As DataRow
        ligne = Matable.NewRow
        'remplissage de ma ligne
        ligne(0) = "001"
        ligne(1) = "Youssef"
        ligne(2) = "23"
        'ajout de la ligne a la datatable
        Matable.Rows.Add(ligne)

        'une autre ligne
        ligne = Matable.NewRow
        'remplissage de ma ligne
        ligne(0) = "002"
        ligne(1) = "azerty"
        ligne(2) = "33"
        'ajout de la ligne a la datatable
        Matable.Rows.Add(ligne)

        'une 3 eme ligne
        ligne = Matable.NewRow
        'remplissage de ma ligne
        ligne(0) = "003"
        ligne(1) = "qwerty"
        ligne(2) = "555"
        'ajout de la ligne a la datatable
        Matable.Rows.Add(ligne)

        'affichage 1 
        For Each r As DataRow In Matable.Rows
            MsgBox("Numero : " & r.Item(0) & " Nom :" & r.Item(1) & " Age " & r.Item(2))
        Next



@+

Instancier un datatable en vb.net

1 réponse

Votre réponse

Discussions similaires