以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [关于重置列]  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=88194)
--  作者：mark96
--  发布时间：2016/7/28 16:31:00
--  [关于重置列]
请问重置列的代码是什么？我想把它应用到窗口的按钮里
--  作者：cbt
--  发布时间：2016/7/28 16:48:00
--  
If CurrentTable IsNot Nothing AndAlso CurrentTable.ColSel >= 0 Then
    Dim dc As DataCol = CurrentTable.Cols(CurrentTable.ColSel).DataCol
    dc.RaiseDataColchanged()
End If
--  作者：mark96
--  发布时间：2016/7/28 17:02:00
--  
我输入了 DataTables("表名").DataCols("B").RaiseDataColChanged() 这个代码，foxtable会自动关闭，怎么破？？急求
--  作者：Hyphen
--  发布时间：2016/7/28 17:34:00
--  
一般是触发的事件产生了死循环。比如事件之间互相触发
--  作者：mark96
--  发布时间：2016/7/28 17:36:00
--  
可是，还是没有重置列的效果。
我在DataColChanged里面设置了下面的代码，就是当数据列数据改变后，E列会自动汇总
Dim dr As DataRow = e.DataRow
Select Case e.DataCol.Name
Case "A","B","C","D"
        dr("E") = dr("A") + dr("B") + dr("C") + dr("D")
End Select
但是我希望从外部导入数据后，不需要我每次按重置列才计算数据
--  作者：大红袍
--  发布时间：2016/7/31 11:00:00
--  

 回复楼上，5楼的代码，不会导致死循环。

 

 你datacolchanged/datacolchanging事件，肯定还有其余的代码影响了。