主题：创建表或临时表，其列名NAME，能不能用引用变量名来实现创建一个列

这样的句子为何不能用，如：

dim s as string

s="aaaaaa"

Dim dtb As New DataTableBuilder("表1")
dtb.AddDef(s, GetType(String), 32)
dtb.Build()

为何不能用变量S来创建一个列？这样的功能能实现吗？

我想用一个表，来作为我想生成的临时表结构的列来源，而不用在代码中去输列名。

这样的话，我就可以加上一些判断条件，动态生成我想要的临时表。

我试了采用变量是可以的。

但如果变量是row变量，则不行，为何？

Dim dtb As New DataTableBuilder("表1")
Dim i As Integer=Tables("表A").Rows.count
For j As Integer =1 To i-1
Dim r As DataRow=DataTables("表A").DataRows(i)
dtb.AddDef(r("第一列"), Gettype(String), 32)
Next
dtb.Build()
MainTable=Tables("表1")。

则无法生成临时表

上面的代码保存的话，没有提示有错误，但运行后，提示一串错误字符，并且没有出现临时表“表1”。上述代码有误吗？

嗯，看见了。

谢谢。

创建非临时表，也能用这样的方法吗？

再问一下有点甜，上面创建列的类型参数Gettype(String),中，string这个也能用变量名代替吗？

如下这样似乎就不行了：

Dim dtb As New DataTableBuilder("表1")
Dim i As Integer=Tables("表A").Rows.count
For j As Integer = 0 To i-1
    Dim r As Row=Tables("表A").Rows(j)
    dtb.AddDef(r("第一列"), Gettype(r("第二列")）, 32)
Next
dtb.Build()
MainTable=Tables("表1")