主题：老大,问个关于建立临时表的代码?(已搞定)

贴出你写的代码

Dim d1 As Date = "2017-12-01"
Dim d2 As Date = d1.AddMonths(1)
Dim dtb As New DataTableBuilder("统计")
Dim d As Date = d1
Do While d < d2
    dtb.AddDef(format(d, "yyyyMMdd"), Gettype(String), 32)
    d =d.adddays(1)
Loop
dtb.Build()
MainTable= Tables("统计")