Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)
        InizializzaTable1()
    End Sub
    
    Sub InizializzaTable1()
        Dim numrows = 3
        Dim numcells = 3

        If numcells > 0 Then
            'ciclo per creazione righe
            For j As Integer = 0 To numrows - 1
                Dim Tr As TableRow = New TableRow()

                'ciclo per creazione celle
                For i As Integer = 0 To numcells - 1
                    Dim Td As TableCell = New TableCell()

                    ‘aggiunge label con codice prodotto
                    If i = 0 Then
                        Dim lblId As Label = New Label
                        lblId.ID = "LblProva" & j
                        lblId.Text = j
                        Td.Controls.Add(lblId)
                    End If

                    'Aggiunge la textbox con la quantità
                    If i = 1 Then
                        Dim txtProva(j) As TextBox
                        txtProva(j).ID = "TxtProva" & j
Td.Controls.Add(txtProva(j))
                    End If
                
                    'aggiunge la cella alla riga
                    Tr.Cells.Add(Td)
                
                Next i
            
                'aggiunge la riga alla tabella
                Table1.Rows.Add(Tr)
            Next j
        Else
            LblTable1.Text = "Nessun record presente"
        End If
       
    End Sub

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs)
       
        ‘qui vorrei stampare,  anche con un banale response.write, tutti i valori delle textbox che ho creato
    End Sub