Voila j'ai un code existant avec une table qui est rempli dynamiquement "row" apres "row" avec du texte.
J'aimerais a present rajouter de temps en temps des radio boutons au milieu de tout ça.
Probleme je n'arrive pas a rajouté des control "radiobouton" dans mes "row", il me jette avec une exeption.
Petit exemple de fonction:
Puis je continuer a utilisé une "table" ou est ce que je dois changer de solution? Merci.
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
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39 pType permet d'indiquer quel type de ligne nous souhaitons ajouter : ' - F : pour une famille ' - C : pour un catégorie ' - T : pour un thème ' - U : pour les utilisateurs résponsable et de remplacement Private Function ajouteLigne(ByVal pTexte As String, ByVal pType As Char) As TableRow Dim cell As New TableCell Dim rdb As New RadioButton With cell Select Case pType Case "F" .Text = pTexte .CssClass = "famille" Case "C" .Text = pTexte .CssClass = "categorie" Case "T" rdb.text = pTexte rdb.CssClass = "theme" rdb.GroupName = "choix" Case "U" .Text = pTexte .CssClass = "responsable" End Select End With 'On ajoute nos champs dans la table Dim row As New TableRow If pType = "T" Then 'cas ou on a un theme row.Controls.Add(CType(rdb, Control)) Else 'cas ou ce n'est pas un theme row.Cells.Add(cell) End If Return row End Function
Partager