生成表达式的时候,先判断列是否存在
Dim bds As String = ""
If DataTables("表A").Contains("第一列") Then
bds &= "第一列+"
End If
If DataTables("表A").Contains("第二列") Then
bds &= "第二列+"
msgbox(bds.Trim("+"))