主题：获取 列长度问题

Dim dt As DataTable

Dim cmd As New SQLCommand

cmd.ConnectionName = vars("ConName")

cmd.CommandText="S elect * From [" & vars("TableName") & "] where 1=2"

dt= cmd.ExecuteReader

For Each dc As DataCol In dt.DataCols

    Dim r As Row = tb2.addnew

    r("第一列") = dc.Name

    r("第二列") = dc.datatype.Name

    r("第三列") = dc.MaxLength

Next

这样获得的 列长度 为什么 都是 -1

就不能正确获得列的长度呢