以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  新增冲借款_table1是sql语句生成的  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=186554)

--  作者:xxfoxtable
--  发布时间:2023/5/12 8:15:00
--  新增冲借款_table1是sql语句生成的
DataTables("新增冲借款_table1").GlobalHandler.DataColChanged = True
If e.DataTable.name = "新增冲借款_table1" Then
    If e.DataCol.Name = "冲减金额" Then
        e.Form.Controls("NumericComboBox1").value = Tables("新增冲借款_table1").Compute("sum(冲减金额)")
        Tables("新增冲借款_table1").Cols("冲减金额").GrandTotal = True
        Tables("新增冲借款_table1").GrandTotal = True
    End If
End If

DataColChanged这个事件的代码不执行,是什么原因呢?

--  作者:有点蓝
--  发布时间:2023/5/12 8:46:00
--  
下面代码放到sql语句生成的代码之后,调用一次就够了

DataTables("新增冲借款_table1").GlobalHandler.DataColChanged = True
       Tables("新增冲借款_table1").Cols("冲减金额").GrandTotal = True
        Tables("新增冲借款_table1").GrandTotal = True

--  作者:xxfoxtable
--  发布时间:2023/5/12 10:06:00
--  

 输入完金额

e.Form.Controls("NumericComboBox1").value = Tables("新增冲借款_table1").Compute("sum(冲减金额)")这个不执行呢?还要保存一下吗?


--  作者:有点蓝
--  发布时间:2023/5/12 10:13:00
--  
和保存不保存没有什么关系。调试代码有没有执行到