返回每一列的列类型，生成一个字符串

很想能获得列的列类型，在论坛里搜索一下，论坛里提到用 DataCol.DataType.Name 返回列类型，不知道在下面的代码中如何使用，才能获得列的类型，是否也就用这段代码

     Dim 列类型 As String

     列类型 = ""

      For Each dc As DataCol In DataTables("职工").DataCols

            if  。。。。。。。= 【数值型】 then

                列类型 = 列类型 & dc.name & "1"

            elseif 。。。。。。。= 【字符型】  then

                列类型 = 列类型  & dc.name & "2"

            elseif 。。。。。。。= 【日期型】  then

                列类型 = 列类型  & dc.name  "3"

            end if

      Next

敬请大师指点一二！

            If  dc.IsNumeric Then