【发布时间】:2011-06-15 17:01:07
【问题描述】:
我有一个带有多个选项的复选框列表。选择的选项从第二个复选框列表中删除。这在下面的代码中工作正常。问题是当用户更改复选框列表 1 中的选定选项时,第二个复选框列表仍然删除了原始选项。我怎样才能改变这个?注意:下拉列表可帮助用户继续使用表单。
页面.aspx
<asp:CheckBoxList ID="CheckBoxList1" runat="server" AutoPostBack="true"> <asp:ListItem Value="3">Italian</asp:ListItem>
<asp:ListItem Value="6">Chinese</asp:ListItem>
<asp:ListItem Value="7">Japanese</asp:ListItem>
<asp:ListItem Value="8">Russian</asp:ListItem>
<asp:ListItem Value="9">Arabic</asp:ListItem>
<asp:ListItem Value="10">Hebrew</asp:ListItem>
<asp:ListItem Value="11">Persian</asp:ListItem>
<asp:ListItem Value="12">Turkish</asp:ListItem>
</asp:CheckBoxList>
...
<asp:DropDownList ID="DropDownList1" Width="100px" runat="server" AutoPostBack="true" OnSelectedIndexChanged="DropDownList1_SelectedIndexChanged">
<asp:ListItem Value="">Select</asp:ListItem>
<asp:ListItem Value="Yes">Yes</asp:ListItem>
<asp:ListItem Value="No">No</asp:ListItem>
</asp:DropDownList>
page.aspx.vb
Protected Sub DropDownList1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles DropDownList1.SelectedIndexChanged
Dim li2 As ListItem
Dim values As String = ""
For i As Integer = 0 To CheckBoxList1.Items.Count - 1
If CheckBoxList1.Items(i).Selected Then
values += CheckBoxList1.Items(i).Value + ","
End If
Next
values = values.TrimEnd(","c)
Dim ints As String() = values.ToString.Split(",")
Dim y As Integer
If DropDownList1.SelectedValue = "Yes" Then
For y = 0 To UBound(ints)
li2 = CheckBoxList2.Items.FindByValue(ints(y))
If Not IsNothing(li2) Then
CheckBoxList2.Items.Remove(li2)
End If
Next
end if
End Sub
【问题讨论】:
标签: .net checkboxlist