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


Rispondi quotando