以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  插入行和删除行的全局事件怎么改写  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=140241)

--  作者:yfy13338431925
--  发布时间:2019/9/2 1:01:00
--  插入行和删除行的全局事件怎么改写

甜哥,蓝老师:

给您作揖了!

以下是两个按钮,目的是保持序号不变,全局事件该怎么改写,另外,插入行写在全局那个事件下面

插入行

 

Tables("表A").InsertNew()
For i As Integer = 0 To Tables("表A").Rows.count -1
    Tables("表A").Rows(i)("序号") = i + 1
Next

 

删除行

Tables("表A").Current.Delete
For i As Integer = 0 To Tables("表A").Rows.count -1
    Tables("表A").Rows(i)("序号") = i + 1
Next


--  作者:有点蓝
--  发布时间:2019/9/2 9:15:00
--  
DataRowAddedDataRowDeleted事件

For i As Integer = 0 To Tables(e.DataTable.name).Rows.count -1
    Tables(e.DataTable.name).Rows(i)("序号") = i + 1
Next

个人认为这种序号没有什么实际意义,还不如直接看行号。还有费劲维护序号的变化,严重影响效率

--  作者:yfy13338431925
--  发布时间:2019/9/2 18:26:00
--  

主要是要打印

 


--  作者:有点蓝
--  发布时间:2019/9/2 20:02:00
--  
那还不如就在打印前临时调整一次顺序。如果是专业报表完全可以在代码中处理。如果是execl模板也有http://www.foxtable.com/webhelp/topics/1405.htm