以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]关联表怎么出现了bug闪退 ？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=125443)
--  作者：seal51
--  发布时间：2018/9/28 11:32:00
--  [求助]关联表怎么出现了bug闪退 ？
关联表格之后，父表主界面增加关联的子表直接闪退，这是为什么呢？
--  作者：有点甜
--  发布时间：2018/9/28 11:47:00
--  
闪退是指程序直接关闭了？如果是，就是死循环了吧？看看你表格的currentChanged等事件代码，注释掉代码测试。
--  作者：seal51
--  发布时间：2018/9/28 12:18:00
--  
注释代码就好了， 不过想用以下代码，怎么办？
Dim cs1 = e.DataRow("cs1")
Dim ood1 = e.DataRow("ood1")
Dim oid2 = e.DataRow("oid2")
Dim oysl1 = e.DataRow("oysl1")
e.DataRow("oysl1") = (cs1-(ood1-oid2)/2)/cs1
--  作者：有点甜
--  发布时间：2018/9/28 12:24:00
--  

 

Dim cs1 = e.DataRow("cs1")
Dim ood1 = e.DataRow("ood1")
Dim oid2 = e.DataRow("oid2")
Dim oysl1 = e.DataRow("oysl1")
 
SystemReady = False
e.DataRow("oysl1") = (cs1-(ood1-oid2)/2)/cs1
SystemReady = True
--  作者：seal51
--  发布时间：2018/9/28 15:19:00
--  
谢谢！OK了