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:

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
Puis je continuer a utilisé une "table" ou est ce que je dois changer de solution? Merci.