以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]批量加载数据表  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=69834)
--  作者：新航程小何
--  发布时间：2015/6/11 16:00:00
--  [求助]批量加载数据表
各位老师，请问怎样通过修改下面的代码实现批量加载数据表，比如还要加载“表A，表b,表c,表D”
Dim q As new OuterTableBuilder
q.TableName = "建园文件"
q.TableCaption = "建园文件"
q.C
q.SelectString = "S elect * F rom {建园文件}"
q.Build
--  作者：大红袍
--  发布时间：2015/6/11 16:04:00
--  

Dim tbs() As String = {"表A", "表B", "表C"}
For Each tb As String In tbs
    Dim q As new OuterTableBuilder
    q.TableName = tb & "1"
    q.TableCaption = tb
    q.SelectString = "Select * F rom {" & tb & "}"
    q.Build
Next
--  作者：新航程小何
--  发布时间：2015/6/11 16:06:00
--  
请问老师，“1”是啥意思？
--  作者：大红袍
--  发布时间：2015/6/11 16:07:00
--  

 你可以去掉，我测使时候用的，表名重复了。