[VB.NET] creazione dinamica di una tabella

[ludoweb.it]

Quello che non capisco è come mai che mi inserisce la textbox solo all'ultima cella della seconda riga, che sto sbagliando?

Dim
 objTable_1 AsNewTable()

            objTable_1.BorderWidth = 1


            
Dim ar AsNewArrayList()            
Dim count AsInteger = 0            
Dim x AsInteger = 0            
Dim txtBox AsNewTextBox()            
For i AsInteger = 1 To 2
Dim tRow_1 AsNewTableRow()                
For x = count To ar.Count - 1                    
Dim tCell_1 AsNewTableCell()
tCell_1.Text = ar(x)
tRow_1.Cells.Add(tCell_1)
Dim tCell_2 AsNewTableCell()

                    tCell_2.Controls.Add(txtBox)

                    tRow_1.Cells.Add(tCell_2)

                    
If x = 2 ThenExit For

                
Next

                count = x + 1

                objTable_1.Rows.Add(tRow_1)

                
'objTable_1.Rows.Add(tRow_2)

            
Next

[djciko]

non capisco che modo stai usando, ci sono molte cose poco chiare.


Tabella con tre righe e tre colonne

        Dim righe As Integer = 3        
        Dim celle As Integer = 3


        Dim tabellaHTML As New Table()
        tabellaHTML.BorderWidth = 1
        tabellaHTML.CellPadding = 3
        tabellaHTML.CellSpacing = 3

        For j As Integer = 1 To righe            
            Dim riga As New TableRow()
            riga.BorderWidth = 1

            For i As Integer = 1 To celle
                Dim cella As New TableCell()
                cella.BorderWidth = 1

                Dim tb As New TextBox()
                tb.BackColor = Drawing.Color.Azure
                tb.Text = "Riga " + j.ToString() + " - Cella " + i.ToString()

                cella.Controls.Add(tb)
                riga.Cells.Add(cella)
            Next

            tabellaHTML.Rows.Add(riga)
        Next

        ph1.Controls.Add(tabellaHTML)

"ph1" è un PlaceHolder posizionato nell'HTML, altrimenti la tabella non si vede.

<form runat="server" id="form1">
    .....
    <asp:PlaceHolder ID="ph1" runat="server"></asp:PlaceHolder>
</form>