Bonjour,

J'ai un énorme soucis que je ne sais résoudre, je liste les champs d'une table que je veux ajouter dans mon DataGrid.
Pour cela j'utilise la commande :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
Me.DataGrid.Rows.Add(maRow("NomChp1"), maRow("NomChp2"), maRow("NomChp3"), maRow("NomChp4"))
Lorsque j'essaie avec le nom de mes champs en dur cela fonctionne sans problème mais voilà lorsque je liste tous mes noms de champs de ma table et que j'essaie avec la fonction ci-dessus d'ajouter les valeurs qui sont attribuées à chaque champs ça ne fonctionne pas.

Je sais qu'en Windev il existe la fonction {"maRow("} + NomChp1 + {")"} ce qui fonctionne bien puisque cela reprend l'écriture de maRow("NomChp1") mais en VB.Net je colle.

Bon je pense que j'ai embrouillé tout le monde donc je vais vous mettre le code que j'ai fait peut-être que cela sera plus compréhensible :

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
Dim maRow As DataRow
 
For u = 0 To 30
    test = test & "maRow(" & Me.DataGrid.Columns(u).Name & "'),"
    System.Windows.Forms.Application.DoEvents()
Next
 
For Each maRow In DataSet.Tables(Me.CMB_TABLE.Text).Rows
 
     'Mon problème
     Me.DataGrid.Rows.Add(Microsoft.VisualBasic.Left(test, Microsoft.VisualBasic.Len(test) - 1))
 
     'Cela fonctionne puisque les champs ainsi que l'objet maRow est saisie en dur
     'Me.DataGrid.Rows.Add(maRow("ID"), maRow("ID_COULEE"), maRow("NATURE_PRODUIT"), maRow("DATE_COULEE"))
 
      System.Windows.Forms.Application.DoEvents()
Next
J'espère que vous pourrez m'aider dans ce problème qui malheureusement m'empêche d'aller plus loin.

Merci d'avance à tous.

Jb_One73