Non ho ben capito cosa vuoi fare cmq:
codice:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim A As Int16 = 0
For A = 0 To NumDoc - 1
Table1.Rows(A).Cells(1).Text = ""
Dim CheckStampa As New System.Web.UI.WebControls.CheckBox()
CheckStampa.Text = " "
CheckStampa.ID = "CheckStampa" & A
Table1.Rows(A).Cells(1).Controls.Add(CheckStampa)
andrea(A) = Table1.Rows(A).Cells(1).FindControl("CheckStampa" & A)
Next
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim a As Int16 = 0
For a = 0 To NumDoc - 1
andrea(A) = Table1.Rows(A).Cells(1).FindControl("CheckStampa" & A)
NewsSelez(a) = CType(andrea(a), CheckBox).Checked
Next a
End Sub