主题：[求助]临时表从0行开始复制表a，代码错在哪里啊？

顺序错了，你可以自己调过来，原来已经有行了，你可以用代码删除，这些能成为问题吗？

DataTables("临时表").Deletefor("")

For Each dr1 As DataRow In DataTables("表A").Select("")
    Dim dr2 As DataRow = DataTables("临时表").AddNew()
    For Each dc As DataCol In DataTables("临时表").DataCols
        dr2(dc.Name) = dr1(dc.name)
    Next
Next

多看帮助，你不掌握基本的A、B、C，别人给你再多的帮助，也没有意义。

看帮助一定要按顺序，头一两遍可以不求甚解，第三遍开始要将每个例子实际操作演练一遍，不明白的就上论坛求助。三遍之后才开始做系统，遇到问题在帮助找答案，找不到的在论坛提问。
此外一定要先掌握《使用指南》，然后再看《开发指南》