VB.Net ComboBox - 基于另一个组合框中的选择的枚举和限制值

Question

我正在从事的项目广泛使用枚举来保存单位符号。像这样...

Public Enum AreaSym
    unknown = 0
    in2
    mm2
End Enum

当我意识到我的枚举名称不能为我的组合框上的下拉菜单起好名字时，我的问题就开始了。我从这个 C# CodeProject http://www.codeproject 找到并实现了一个 TypeConverter .com/KB/cs/LocalizingEnums.aspx?msg=3746572 ...它允许您在 .Resx 中分配枚举值友好名称文件，并且它重载 GetValues 函数，以便从 .Resx 文件返回 Enums 友好名称。这很有效，因为我可以将组合框数据源直接分配给枚举。

ComboBox1.DataSource = System.Enum.GetValues(GetType(AreaSym))

但是，我意识到，当以这种方式使用数据源时，我必须操作数据源以在组合框中创建更改。例如，如果我不想向用户显示未知，我需要另一种方式来加载我的组合框。这是我决定制作一个 List(Of KeyValuePair(AreaSym, String)) 的时候，

Public Function AreaSymbols() As List(Of KeyValuePair(Of AreaSym, String))
    AreaSymbols = New List(Of KeyValuePair(Of AreaSym, String))
    AreaSymbols.Add(New KeyValuePair(Of AreaSym, String)(AreaSym.in2, "in²"))
    AreaSymbols.Add(New KeyValuePair(Of AreaSym, String)(AreaSym.mm2, "mm²"))
    Return AreaSymbols
End Function

这很棒，因为现在我可以使用列表准确控制组合框中的内容。

ComboBox1.DataSource = UnitNameList.AreaSymbols
ComboBox1.DisplayMember = "Value"
ComboBox1.ValueMember = "Key"

但是，我发现使用数据源阻止了我做两件事。

1. 加载表单时，我希望组合框本身显示为空且没有文本，或者显示我在文本属性中输入的文本。当前使用数据源，它始终填充列表中的第一项。

2. 我希望能够根据另一个列表中的项目选择轻松限制列表中的项目。典型的例子是两个组合框填充了完全相同的值 (1,2,3) & (1,2,3)。当您在 ComboBox 1 中选择 1 时，ComboBox 2 中只有 (2,3) 可供选择。

我意识到，如果我使用 Items 而不是数据源，我可能可以轻松做到这一点，我只是不确定什么最好的方法是因为我需要拥有枚举和字符串的键、值对......