主题：请教

 执行一次SaveConfigValue，然后发布项目

 

不需要赋初值，因为没有意义。

 

取值的时候，如果没有取到，就会用默认值的

 木有，发布之前，统一设置一次。

 Dim dt As DataTable = DataTables("表A")
Dim ary() As String = {"a", "b", "c", "d"}
For Each dc As DataCol In dt.DataCols
    Dim vs As object = dt.GetValues(dc.name)
    Dim flag As Boolean = True
    For Each a As String In ary
        If vs.contains(a) = False Then
            flag = False
        End If
    Next
    If flag Then
        msgbox(dc.name)
    End If
Next

 Object 试试为了方便才写的，一般情况，你最好定义成对应的类型