以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  新增行的位置能否更改？  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=15320)
--  作者：sinlang5778
--  发布时间：2011/12/20 16:26:00
--  新增行的位置能否更改？
系统默认新增行的位置在最下面，可否设置为新增行的位置在最上面？
--  作者：yangming
--  发布时间：2011/12/20 16:29:00
--  

做一个新增行按钮,在表中加一个ID列,同时生成自增量,新增行按钮中加一段根据ID降序排序代码,试试

 

Dim dr As DataRow
dr = DataTables("表A").AddNew()
dr("ID") = DataTables("表A").Compute("Max(ID)")+1
Tables("表A").Sort = "ID DESC"

[此贴子已经被作者于2011-12-20 17:02:52编辑过]
--  作者：sinlang5778
--  发布时间：2011/12/20 16:34:00
--  
ID降序排序代码如何写？
--  作者：yangming
--  发布时间：2011/12/20 17:03:00
--  
以下是引用sinlang5778在2011-12-20 16:34:00的发言：
ID降序排序代码如何写？

Dim dr As DataRow
dr = DataTables("表A").AddNew()
dr("ID") = DataTables("表A").Compute("Max(ID)")+1
Tables("表A").Sort = "ID DESC"