用代码在外部数据库中创建一个表，想引用变量值自动增加列，但字段类型这个变量
s(i)该怎么处理才能正确执行呢？？赋值时前面加上字符串“ADOXType.”也不行：
Dim Builder As New ADOXBuilder("xbdb")
Dim tbl As ADOXTable
Builder.Open()
tbl = Builder.NewTable("表名")
Dim s as new list(of string)
S= （略过）集合赋值
for i as integer =0 to s.count-1
Tbl.AddColumn(字段名变量 ,s(i),长度变量)
next
Builder.AddTable(tbl)
Builder.Close()
类型是无法使用变量的，只能这样
for i as integer =0 to s.count-1
select case s(i)
case "String"
Tbl.AddColumn(字段名变量 ,ADOXType.String,长度变量)
case "DateTime"
Tbl.AddColumn(字段名变量 ,ADOXType.DateTime)case .......
……
next