同时读取一个xls里的多张表

wainnnni

读取单张表正常

取excel表名 (通用对话框1.文件名, 表名数组)
取excel字段名 (数据库连接1, 记录集1, 通用对话框1.文件名, 表名数组 [1], 字段名数组)
初始化列表 (超级列表框1, 字段名数组)
    记录集1.打开 (“select * from [” ＋ 表名数组 [1] ＋ “$]”, #SQL语句, )
    .计次循环首 (记录集1.记录数量, n)
        处理事件 ()
        .如果真 (n ≥ 数据开始行)
            索引 ＝ 超级列表框1.插入表项 (, , , , , )
            .计次循环首 (取数组成员数 (字段名数组), n1)
                记录集1.读文本 (n1 － 1, 临时文本)
                超级列表框1.置标题 (索引, n1 － 1, 临时文本)
            .计次循环尾 ()
        .如果真结束
        记录集1.到下一条 ()
    .计次循环尾 ()
    记录集1.关闭 ()
    数据库连接1.关闭 ()
=======================以上正常的=============
我想同时读取多张表

取excel表名 (通用对话框1.文件名, 表名数组)
初始化列表 (超级列表框1, 字段名数组)
.计次循环首 (取数组成员数 (表名数组), i)
    清除数组 (字段名数组)
    取excel字段名 (数据库连接1, 记录集1, 通用对话框1.文件名, 表名数组 [i], 字段名数组)
    记录集1.打开 (“select * from [” ＋ 表名数组 [i] ＋ “$]”, #SQL语句, )
    .计次循环首 (记录集1.记录数量, n)
        处理事件 ()
        .如果真 (n ≥ 数据开始行)
            索引 ＝ 超级列表框1.插入表项 (, , , , , )
            .计次循环首 (取数组成员数 (字段名数组), n1)
                记录集1.读文本 (n1 － 1, 临时文本)
                超级列表框1.置标题 (索引, n1 － 1, 临时文本)
                调试输出 (到文本 (临时文本))     //调试输出的内容都是对的, 就是不能加到超级列表框中, 是怎么回事呢
            .计次循环尾 ()
        .如果真结束
        记录集1.到下一条 ()
    .计次循环尾 ()
    记录集1.关闭 ()
    数据库连接1.关闭 ()
.计次循环尾 ()

touale

楼主可以给一下源码嘛

犹豫的流星

路过  看看

wainnnni

已经解决了, 是我太马虎了...