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 :
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.
Code : Sélectionner tout - Visualiser dans une fenêtre à part Me.DataGrid.Rows.Add(maRow("NomChp1"), maRow("NomChp2"), maRow("NomChp3"), maRow("NomChp4"))
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 :
J'espère que vous pourrez m'aider dans ce problème qui malheureusement m'empêche d'aller plus loin.
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
Merci d'avance à tous.
Jb_One73
Partager