动态的添加dropDownList后,再传回服务器时,如何得到该dropDownList 的selectedValue

Question

上面是第一个问题
第二个问题是,我如何给动态添加的web控件或者html控件添加事件

Answer 1

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        '在此处放置初始化页的用户代码
        Dim td As New HtmlTableCell
        Dim tr As New HtmlTableRow
        'Dim lblto As New Label
        'lblto.Text = "第二行"
        Dim btn As New Button
        btn.ID = "btn"
        btn.Text = "我按"
        AddHandler btn.Click, AddressOf btn_Click   ''添加事件，把事件委托给btn_Click过程
        td.Controls.Add(btn)
        tr.Controls.Add(td)
        tab.Controls.Add(tr)
    End Sub    Private Sub btn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Response.Write("<script>alert('我是超级苯苯');</script>")
    End Sub

Answer 2

第一个问题的dropdownlist这样解决    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        '在此处放置初始化页的用户代码
        Dim td As New HtmlTableCell
        Dim tr As New HtmlTableRow        Dim ddl As New DropDownList
        ddl.ID = "ddl"
        ddl.Items.Add(New ListItem("苯苯", "0"))
        ddl.Items.Add(New ListItem("超级", "1"))        td.Controls.Add(ddl)
        tr.Controls.Add(td)
        tab.Controls.Add(tr)
    End Sub    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Response.Write("<script>alert('你选择了 " & CType(Me.FindControl("ddl"), DropDownList).SelectedValue & "');</script>")
    End Sub

Answer 3

谢谢楼上的,我没说清楚,我的意思是往动态添加的控件里加入javascript的事件,不是要传回服务器之后的事件,

Answer 4

那也跟正常控件添加JS一样捏！Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        '在此处放置初始化页的用户代码
        Dim td As New HtmlTableCell
        Dim tr As New HtmlTableRow        Dim btn As New Button
        btn.ID = "btn"
        btn.Text = "我按"
        btn.Attributes.Add("onClick", "javascript:alert('弹出!可以捏!');")
        td.Controls.Add(btn)
        tr.Controls.Add(td)
        tab.Controls.Add(tr)
    End Sub