如何制作一个不同的列表,并从组合框VB​​.NET中选择一个项目

时间:2014-08-16 12:29:33

标签: vb.net

我将列表(约500项)分成4个列表(每个列表都有一些共同点) 但是它们都会出现在一个组合框中,所以如果我想使用if语句,用户将选择项目并显示列表数量:

如果ComboBox3.SelectedItem ="葡萄糖酸亚铁"或ComboBox3.SelectedItem ="硫酸亚铁" 这将是一场灾难

有没有人有解决方案?

2 个答案:

答案 0 :(得分:1)

使用IndexOf功能:

定义列表:

Dim List1 As New List(Of String)
Dim List2 As New List(Of String)
Dim List3 As New List(Of String)
Dim List4 As New List(Of String)

然后只需:

If Not List1.IndexOf(ComboBox3.SelectedItem) = -1 Then 'Item exists in list number 1
    Label1.Text = "<listnamehere>"
ElseIf Not List2.IndexOf(ComboBox3.SelectedItem) = -1 Then 'Item exists in list number 2
    Label1.Text = "<listnamehere>"
ElseIf Not List3.IndexOf(ComboBox3.SelectedItem) = -1 Then 'Item exists in list number 3
    Label1.Text = "<listnamehere>"
ElseIf Not List4.IndexOf(ComboBox3.SelectedItem) = -1 Then 'Item exists in list number 4
    Label1.Text = "<listnamehere>"
End If

答案 1 :(得分:0)

尝试添加自定义属性

<asp:DropDownList ID="DropDownList1" runat="server" >
    <asp:ListItem Text="No 1" Value="1" data-group="a"></asp:ListItem> 
    <asp:ListItem Text="No 2" Value="2" data-group="b"></asp:ListItem> 
</asp:DropDownList>

从代码背后,引用它如:

Dim Selected = DropDownList1.SelectedItem
If Selected IsNot Nothing Then
     'if Selected.Attributes("data-group") ="a" then
End If