如何对集合里的行再做排序 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何对集合里的行再做排序

共有3614人关注过本帖树形打印复制链接主题：如何对集合里的行再做排序

stone9434

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：159 积分：1656 威望：0 精华：0 注册：2013/3/19 16:05:00

如何对集合里的行再做排序 发帖心情

Post By：2022/1/4 15:57:00 [只看该作者]

drs = e.DataTable.SQLSelect("[产品名称] = '" & mr("产品名称") & "'","", "出入库日期,[_identify]")

drs.Add(mr) '

请教：

=====sqlselect不包含未保存行，mr是新增行，所以不包括在内，我想对drs包含的行再作"出入库日期,[_identify]"的排序，应该如何写？

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：110495 积分：562359 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2022/1/4 16:51:00 [只看该作者]

需要新建一个集合

drs = e.DataTable.SQLSelect("[产品名称] = '" & mr("产品名称") & "'","", "出入库日期,[_identify]")

drs.Add(mr)

dim v as boolean

dim lst as new list(of datarow)

for each dr as datarow in drs

if dr("出入库日期") <= mr("出入库日期") then

if dr("_identify") < mr("_identify") then

lst.add(dr)

continue for

end if

if v = false then

lst.add(mr)

end if

lst.add(dr)

continue for

主题：如何对集合里的行再做排序