主题：[求助]越用越少

Dim nms() As String = {"第一列","第二列","第三列","第四列"}
Select Case e.Col.name
    Case "第一列","第二列","第三列","第四列"
        Dim lst As new List(of String)
        lst.AddRange(New String() {"a","b","c","d"})
        For Each nm As String In nms
            If e.Col.Name <> nm Then
                If lst.Contains(e.Row(nm)) Then
                    lst.Remove(e.Row(nm))
                End If
            End If
        Next
        e.col.ComboList = String.Join("|",lst.ToArray)
End Select

上面代码的{"a","b","c","d"}内容如果来源于表B第一列,请问如何设置?

麻烦改一下代码,通用型的,即:

表A的"第一列，第二列，第三列，第四列"引用 表B的第一列 作为列表；

如果列表内容已被表Ａ某列选中，则表Ａ其它列的列表不出现该内容。