以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何创建一个包含表所有行的集合呢!  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=116668)

--  作者:Hareen时代
--  发布时间:2018/3/29 9:49:00
--  如何创建一个包含表所有行的集合呢!
狐表怎样用代码创建一个包含所有行的集合呢!不是for 语句的遍历,就是创建一个drs
--  作者:有点甜
--  发布时间:2018/3/29 9:50:00
--  

参考

 

http://www.foxtable.com/webhelp/scr/0400.htm

 

或者,直接

 

Dim drs = DataTables("表a").datarows


--  作者:Hareen时代
--  发布时间:2018/3/29 9:55:00
--  
Dim drs = Tables("表a").rows  
要是table表可以吗?

--  作者:有点甜
--  发布时间:2018/3/29 9:56:00
--  

回复3楼,可以。关键是你使用drs之后要怎么用?

 

Dim drs = Tables("表A").DataTable.Select(Tables("表A").Filter) 这样也可以。


--  作者:Hareen时代
--  发布时间:2018/3/29 10:03:00
--  
我想在table表根据日期排序完成后,根据排序后的行,给每行一个从小到大的编号!

这个有参考代码吗?

--  作者:有点甜
--  发布时间:2018/3/29 10:05:00
--  

如,代码

 

For Each r As Row In Tables("表A").Rows
    r("第一列") = r.index + 1
Next


--  作者:Hareen时代
--  发布时间:2018/3/29 10:16:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:au82`x7hy8{z91ng4xgf9l.png
图片点击可在新窗口打开查看

这个代码貌似还不行,table表排序后,然后把编号列进行从大到小的赋值,你看看这个有办法实现吗?

--  作者:有点甜
--  发布时间:2018/3/29 10:23:00
--  

AfterSort事件

 

For Each r As Row In e.Table.Rows
    r("第一列") = r.index + 1
Next


--  作者:Hareen时代
--  发布时间:2018/3/29 10:25:00
--  
喔喔,我再试试
--  作者:Hareen时代
--  发布时间:2018/3/29 11:07:00
--  
窗口里面的table表怎样排序呢!我就访问不到那个表!