Criar eventos Texbox Dinâmicos

Question

Ola

Estou criando dinamicamente textbox na tela e esta dando tudo certo, menos atribuir evento textchange a ele.

O codigo que crio ele é assim. Uma chamada de um button

                                Dim txtBox As TextBox = New TextBox()
                                tc.Attributes("Class") = "COL_DESCRICAO_DINAMICA"
                                txtBox.ID = "TXT_CAD_QUANT_" & NOME_CAMPOS_
                                ARR_QUANT.Add("ctl00$ContentPlaceHolder1$TXT_CAD_QUANT_" & NOME_CAMPOS_)
                                txtBox.Width = "100"
                                txtBox.Text = String.Empty
                                'txtBox.Text = Rnd() * 100
                                txtBox.Attributes("Class") = "txt_rigth"
                                txtBox.AutoPostBack = True
                                AddHandler txtBox.TextChanged, AddressOf txtTest_TextChanged
                                tc.Controls.Add(txtBox)

Peguei este exemplo na net de como criar o evento. Porem nao esta dando certo.

AddHandler txtBox.TextChanged, AddressOf txtTest_TextChanged

O que esta faltando fazer?

---

Hellmann's (Joviano Pott)

Answer 1

Bom dia!

Ninguem consegue me ajudar?

Preciso fazer isso tambem com um button. Mas o evento nao funciona.

Li em varios post que este tipo de evento precisa estar no page_load e on_init, porem o meu evento é criado apos clique em um button estático. Qual seria a solução para funcionar?

private sub criar_botao()
 Dim btn As New Button()
                    btn.ID = "btn_calcular"
                    btn.Text = "C"
                    AddHandler btn.Click, AddressOf btn_calcular_Click
                    tc.Controls.Add(btn)
end sub


Protected Sub btn_calcular_Click(ByVal sender As Object, ByVal e As EventArgs)
        CALCULAR_TEXTBOX()
    End Sub

---

Hellmann's (Joviano Pott)