主题：[求助]动态加载表格控件时，为什么会报“表无_identify列“？

窗口表事件

窗口与控件事件

窗口1_AfterLoad

Dim tcl As WinForm.TabControl

tcl = e.Form.CreateControl("TabControl1",ControlTypeEnum.TabControl)

tcl.Dock = 5

tcl.TabPages.Add("Page1","试验")

Forms("窗口1").AddControl(tcl)

Dim tbl As WinForm.Table

tbl = e.Form.CreateTable("Table1", "表C",True )

tbl.Dock = 5

Forms("窗口1").Controls("TabControl1").TabPages("Page1").AddControl(tbl)

2.有报错的工程代码

Dim EndTab As  WinForm.Table

For Each TopPg In TopGroup.TabPages

LevSecTab = e.Form.CreateControl("LevSec" & TopPg.Name ,ControlTypeEnum.TabControl )

    For Each drSec As DataRow In DtRep.Select(ReSysFilter & " And " & TaCoFilter  & " And ReportGroupCode = '" &TopPg.Name & "'","ReportGroupCode")

        LevSecTab.TabPages.Add(drSec("ReportCode"),drSec("ReportCode") & "|" & drSec("ReportName"))

            If drSec("ReportCode") = "Z1" Then

            EndTab = e.Form.CreateTable(drSec("ReportCode") & "Tab" ,"表C",True )

            EndTab.Dock = 5

            EndTab.ShowCheckBox = False

            LevSecTab.TabPages(drSec("ReportCode")).AddControl(EndTab)

            End If

    Next

LevSecTab.Dock = 5

TopPg.AddControl(LevSecTab)

Next 

疑问：

  EndTab = e.Form.CreateTable(drSec("ReportCode") & "Tab" ,"表C",True ) 中的True改为false时不报错.

我已经把问题简化求证,但还没查出错误点.

求助:请费心看一下我的工程代码,看问题出在哪?(工程代码在"录入主窗口"的AfterLoad事件中。

工程文件我随后上传

出故障时的图片，我也随后上传。

故障点在我点多页控件时，点z1的那个页，报错的。