主题：[求助]如何判断某列是表达式列？

示意代码如下：

dim dc as DataCol

For each dc In DataTables("表A").DataCols

    If dc.Expression Exist then

       output.show("此列是表达式列")

     else

       output.show("不是表达式列")

NEXT

靠表达式的内容来区分，只能区分出一部分，另一部分“表达式为空”的表达式列还是不能排除。。。

真诚感谢！

狐狸爸爸的是正路，我下面的是旁路（旁路也是大红袍、BIN大师提供的）

Dim Builder As New ADOXBuilder
Dim dc As Col
Dim NewName As String
Dim OLDname As String
Builder.Open()
For Each dc  In Tables("表A").Cols
    If dc.DataCol.Expression = "" Then
        NewName =  "ttt"+dc.name
        OLDname = dc.name
        Try
            Builder.Tables("表A").RenameColumn(OLDname,NewName)
        Catch ex As Exception
           
        End Try
    End If
Next
Builder.Close()

If (DataTables.Contains("表A") = False)  Then '如果未加载
    DataTables.load("表A") '加载表
End If