主题：已具有相同键报错

请教老师，下面的报错查不出原因，

 

通过如下代码调入主页到主窗口的Panel中报错          很奇怪，在窗口设计器的预览，独立打开窗口不报错，就是调入主窗口中报错

    Dim PB1 As WinForm.Panel = Forms("主窗口").Controls("Paneel1")
    Dim Name1 As String = "主页"
    Forms(Name1).OPEN(-1000,-1500)
    Forms(Name1).BaseForm.TopLevel = False
    Forms(Name1).BaseForm.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
    Forms(Name1).BaseForm.Dock = System.Windows.Forms.DockStyle.Fill
    PB1.BaseControl.Controls.Clear
    PB1.BaseControl.Controls.add(Forms(Name1).BaseForm)
    Forms("主页").Open 

 

    主页窗口的AfterLoad 加载代码如下      SQLTable类型   Select语句：Select * F rom {项目备案} Where [_Identify] Is Null

    主窗口中的表同名用的是正本，这里用的是 SQLTable

   
With DataTables("主页_Tabble3")
    .LoadFilter = "" '设置加载条件
    .LoadPage = 0 '加载第一页
    .LoadTop = 15 '每页15行
    .LoadOver = "登记时间"
    .LoadFilter = "项目完成_完成 = 0"
    .LoadReverse = True 'False
    .Load()
    Tables("主页_Tabble3").Sort = "登记时间 DESC"
End With

 

    已具有相同键.............

此主题相关图片如下：无标题.jpg

 

做一个对应实例发上来测试。