主题：systemidle错误

单个窗口的时候，打开和关闭都不会出问题
，同时打开三个窗口的时候，打开关闭两次就出现这个错误

此主题相关图片如下：搜狗截图20140726151746.png

点击按钮加载表并打开窗口，打开窗口前加载表

按钮click事件代码
'加载并显示相关表
If DataTables.Contains("mokuai")=False Then
    DataTables.Load("mokuai")
End If
Tables("mokuai").Visible=True
'加载并显示相关表
Forms("模块").open
MainTable = Tables("mokuai")

关闭窗口时卸载表,窗口afterclose事件代码
'卸载相关表
If DataTables.Contains("mokuai")=True Then
    DataTables.unLoad("mokuai")
End If

'卸载相关表

如果不卸载表，也不会弹出错误提示，只要三个表都卸载了就会出错

SysteIdle事件中没有写代码

卸载相关表
If DataTables.Contains("mokuai")=True Then
    DataTables.unLoad("mokuai")
End If

'卸载相关表

缷载表代码放在关闭窗口的按钮代码最后,,还是会提示错误

 

第一次三个窗口都打开后，一个一个关闭，是正常的，第二次三个窗口都打开后，关闭到第二个的时候就提示错误，一定要关闭狐表重新开

把菜单中的systeidle事件代码全部删除后，不会提示错误了

测试了下

菜单中以下代码导致提示错误

'和卸载表的代码冲突
''此段代码用于更新日常工作区"切换"按钮的状态,如果按钮已经改名或者 移到别的功能区,请对应地修改此段代码
''如果删除了此按钮,应该删除此段代码
'Static tb As RibbonMenu.ToggleButton
'If tb Is Nothing Then
    'tb = CType(RibbonTabs("Common").Groups ("SortAndFilter").Items("Toggle"), RibbonMenu.ToggleButton)
'End If
'If (CurrentTable.Filter > "" AndAlso CurrentTable.ApplyFilter =  True) OrElse (CurrentTable.Sort > "" AndAlso  CurrentTable.ApplySort = True) OrElse (CurrentTable.IsRelation =  False AndAlso CurrentTable.DataTable.InBackEndFilterMode = True)  Then
    'If tb.Pressed = False Then
        'tb.Pressed = True
    'End If
'Else
    'If tb.Pressed = True Then
        'tb.Pressed = False
    'End If
'End If  

''此段代码用于更新配置栏"后台筛选"按钮的状态,如果按钮已经改名或者 移到别的功能区,请对应地修改此段代码
''如果删除了此按钮,应该删除此段代码
'Static bf As RibbonMenu.ToggleButton
'If bf Is Nothing Then
    'bf = CType(ConfigBar.Items("BackEndFilter"),  RibbonMenu.ToggleButton)
'End If
'If CurrentTable.AllowBackEndFilter Then
    'If bf.Pressed = False Then
        'bf.Pressed = True
    'End If
'Else
    'If bf.Pressed
        'bf.Pressed = False
    'End If
'End If
'和卸载表的代码冲突

加入暂停事件代码也是提示错误

谢谢甜老师

加了currenttable判断后还是提示错误，我先把那两段代码注释掉了

表加载太多会不会占用太多内存？？