dotNETportal.cz

Zdravím Vás všechny a prosím o radu. Vytvořil jsem kvůli indexování na formuláři dvacet checkboxů viz kód níže. Jak vytvořím k takto vytvořeným objektům metody? Tento zápis nefunguje:

Private Sub CheckBox_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox(0).CheckedChanged

   For n = 0 To 19
            Check(n) = New CheckBox
            With Check(n)
                .Name = "Check" & n.ToString()
                .Location = New Point(27 + yy, xx + 50 + (n * 25))
                .AutoSize = True
            End With
            If n >= 9 Then
                yy = 200
                xx = -250
            End If
        Next
        Protokol.Controls.AddRange(Check)

Děkuji předem za odpověď

Josef

Vyřešeno ... příště nechám otázku chvilku uležet, než se zeptám :-)

 For n = 0 To 19
            Check(n) = New CheckBox
            With Check(n)
                .Name = "Check" & n.ToString()
                .Location = New Point(27 + yy, xx + 50 + (n * 25))
                .AutoSize = True
            End With
            If n >= 9 Then
                yy = 200
                xx = -250
            End If
 '''AddHandler Check(n).CheckedChanged, New System.EventHandler(AddressOf Protokol.CheckChange)'''
        Next
        Protokol.Controls.AddRange(Check)