以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]鼠标点击窗口中的Table时出错(原因找到,求解)  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=102496)

--  作者:yyzlxc
--  发布时间:2017/6/21 8:56:00
--  [求助]鼠标点击窗口中的Table时出错(原因找到,求解)
窗口“对比”中加了Table1和Table2,类型设置为SQLTable,窗口AfterLoad事件没有代码。打开窗口和按钮代码运行均正常,但是鼠标点击Table时出错,分别跳出以下对话框,不知何故?请各位老师指教,谢谢!!


图片点击可在新窗口打开查看此主题相关图片如下:ab.png
图片点击可在新窗口打开查看


图片点击可在新窗口打开查看此主题相关图片如下:ac.png
图片点击可在新窗口打开查看

打开窗口时正常:

图片点击可在新窗口打开查看此主题相关图片如下:ae.png
图片点击可在新窗口打开查看



[此贴子已经被作者于2017/6/21 12:15:42编辑过]

--  作者:yyzlxc
--  发布时间:2017/6/21 8:57:00
--  
运行按钮代码时也正常:


图片点击可在新窗口打开查看此主题相关图片如下:ad.png
图片点击可在新窗口打开查看


--  作者:有点色
--  发布时间:2017/6/21 9:36:00
--  
 测试没有问题,你新做一个窗口也是这样?
--  作者:yyzlxc
--  发布时间:2017/6/21 9:41:00
--  
试试看,谢谢有点色老师的指教!
--  作者:yyzlxc
--  发布时间:2017/6/21 9:42:00
--  
试试看,谢谢有点色老师的指教!
--  作者:yyzlxc
--  发布时间:2017/6/21 12:15:00
--  
问题找到了,在项目属性的CurrentTableChanged事件加了以下代码,就会出现上述问题,将该代码屏蔽,就不会出错。不知道是不是BUG。

If CurrentTable.DataTable.Name = "对比" Then
    Forms("对比").Show()
Else
    Forms("对比").Close()
End If

--  作者:有点色
--  发布时间:2017/6/21 14:40:00
--  
  尽量不要在currentTableChanged事件关闭窗口,事件里,不能关闭正在操作的表所在的窗口。