以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  临时表到内部表切换会报错  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=158145)

--  作者:foxyuan
--  发布时间:2020/11/9 17:38:00
--  临时表到内部表切换会报错
Tables("项目信息").OpenView("项目信息")
Forms("项目信息窗口").open
MainTable = Tables("项目信息")

项目信息窗口是有个afterload代码的,上面的这个按钮命令,如果是从一个内部表到另一个内部表正常,但如果是从一个临时表到内部表切换会报错,主要是afterload里的设置未应用到实例。
如果换成:
Tables("项目信息").OpenView("项目信息")
MainTable = Tables("项目信息")
Forms("项目信息窗口").open

表间切换都正常,只是会先打开表然后再打开窗口,会有明显的切换。有没有兼顾两者的方法?

--  作者:foxyuan
--  发布时间:2020/11/9 17:51:00
--  

MainTableChanged里有


If CurrentTable.Name <> "项目信息" Then

    Forms("项目信息窗口").Close()

End If


估计上面的代码是由于切换到MainTable = Tables("项目信息")前打不开Forms("项目信息窗口"),但从内部表到内部表我发现都正常不报错。


--  作者:有点蓝
--  发布时间:2020/11/9 20:06:00
--  
还是使用这个吧
Tables("项目信息").OpenView("项目信息")
MainTable = Tables("项目信息")
Forms("项目信息窗口").open

否则和MainTableChanged代码冲突