主题：窗口在窗口设计时预留正常，但在软件登录加载时异常

"销售报表"表有加载数据吗？

Dim page As WinForm.TopicPage

Dim nms() As String = {"项目名称","签约机构","签约人"}

For Each nm As String In nms

page = Forms("导航窗口").Controls("报盘TopicBar1").pages(nm)

For Each pd As String In DataTables("销售报表").GetValues(nm)

msgbox(pd) '这里弹出什么内容

Dim lnk As WinForm.TopicLink = page.Links.add(pd,pd)

Dim cnt As Integer = DataTables("销售报表").Compute("count([_identify])", nm & " = ' " & pd & " '")

lnk.Text = lnk.Text & "(" & cnt & ")"

Next

Next

msgbox(DataTables("销售报表").datatrows.count) ‘"销售报表"表有加载数据吗？

Dim page As WinForm.TopicPage

Dim nms() As String = {"项目名称","签约机构","签约人"}

For Each nm As String In nms    

    page = Forms("导航窗口").Controls("报盘TopicBar1").pages(nm)

    For Each pd As String In DataTables("销售报表").GetValues(nm)

        msgbox(pd) '这里弹出什么内容    

        Dim lnk As WinForm.TopicLink = page.Links.add(pd,pd)

        Dim cnt As Integer = DataTables("销售报表").Compute("count([_identify])", nm & " = ' " & pd & " '")

        lnk.Text = lnk.Text & "(" & cnt & ")"

    Next

Next

如果不会调试就把实例发上来

打开窗口设计看看"项目名称","签约机构","签约人"这些是不是导航page的名称，还是只是标题

请上传实例说明

新建一个项目，使用内部表或者access数据库，重现这个问题，然后把新项目发上来测试

旧项目：关闭退出项目，删除项目所在的文件夹里的bin目录，然后重启项目试试。

实例发上来

参考：http://www.foxtable.com/webhelp/topics/2902.htm