Dynamisch erstellte Buttons VB.Net mit Schleife

Ich habe ein sehr seltsames Problem mit dynamisch erstellten Buttons in VB.NET:
Das Click-Ereignis wird nicht ausgelöst, wenn Sie zu erstellen, in einer Schleife. Hier ist mein code:

    Panel1.Controls.Clear()
    For i As Integer = 0 To 100 Step 1
        Dim b15 As new Button
        b15.Text = "Test3"
        b15.id = "a" & i
        AddHandler b15.Click, AddressOf updateFunc
        Panel1.Controls.Add(b15)
    Next

Diese eine funktioniert nicht (nur beim laden von Seiten ausgelöst wird, nicht das Click-Ereignis), aber wenn ich

    Dim b14 As New Button
    b14.Text = "Test"
    b14.id = "asdf"
    AddHandler b14.Click, AddressOf updateFunc
    Panel1.Controls.Add(b14)

funktioniert es einwandfrei und das Ereignis ausgelöst wird.

Den Header der Funktion updateFunc ist folgende:

Protected Sub updateFunc(ByVal sender As Object, ByVal e As System.EventArgs)

Irgendwelche Ideen, warum es nicht funktioniert mit der Schleife?
Vielen Dank für die Antworten!

Ist diese Windows-oder Web-Forms?
es ist Web-Formulare!

InformationsquelleAutor deru | 2014-07-07

  1. 1

    Tun Sie IsPostBack überprüfen? Ich gehe davon aus, du hast. Versuchen Sie, erstellen Sie das Steuerelement außerhalb.

     Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
    If Not IsPostBack Then
       'Do Something
    Else
       'Do Something else
    End If

    Panel1.Controls.Clear()
    For i As Integer = 0 To 10 Step 1
        Dim b15 As New Button
        b15.Text = "Test3"
        b15.ID = "a" & i
        AddHandler b15.Click, AddressOf updateFunc
        Panel1.Controls.Add(b15)
    Next
 End Sub
    Nein, ich habe keine IsPostBack in die ganze Seite. Und die beiden codesnips sind nur neben einander, ohne code zwischen.
    Wenn Sie Ihre erstellen Sie Ihre Kontrollen? Alle dynamisch erstellten controls, wird verloren sein, nach einem postback, es sei denn, Sie Sie neu erstellen. Check this out forums.asp.net/t/...
    Wow sind Sie richtig! Danke für die Antwort! Denke, dass wird mir helfen!
    Du bist herzlich willkommen. Froh zu helfen.

    InformationsquelleAutor HengChin

  2. 0
    flpnlContent.Controls.Clear()
        For i As Integer = 0 To 10
            Dim b15 As New Button
            b15.Text = "a" & i
            b15.Name = "a" & i
            AddHandler b15.Click, AddressOf btn_Click
            flpnlContent.Controls.Add(b15)
        Next

    verwenden Sie diese, es wird funktionieren

    InformationsquelleAutor user6177004

Schreibe einen Kommentar