主题：关于目录树生成多层表头的求助

是的，没有必要整得太复杂，直接一个表，三列： 表名、列名、标题。

AfterOpenProject事件：

For Each dr As DataRow  in DataTables("表名").DataRow

   DataTables(dr("表名")).DataCols(dr("列名")).Caption = dr("表名")

Next

For Each dt As DataTable in DataTables

    dt.BuildHeader()

Next

平时可以网用户直接在这个表通过下拉列表选择表和列，并输入对应的标题，简单快捷。