以下是引用xongyijd在2019/6/17 7:12:00的发言：那怎么引用？
在
tbl.AddColumn(dr("列名称"), dr("数据类型"))
中用dr（”数据类型”）显示数据转换无效，怎么写？
不可以直接取，必须向这样处理
For Each dr As DataRow DataTables("表结构库").dataRows
Select Case dr("数据类型")
Case "字符型"
tbl.AddColumn(dr("列名称") , ADOXType.String, 255) '字符型全部设置成255
Case "日期时间型"
tbl.AddColumn(dr("列名称") , ADOXType.DateTime)
Case "整数型"
tbl.AddColumn(dr("列名称") , ADOXType.Integer)
Case "逻辑型"
end select
next
Builder.AddTable(tbl, True, True)
Builder.Close()
加好友 
发短信
Post By：2019/6/17 9:03:00 [显示全部帖子]
