以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于辅助列排序  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=124875)

--  作者:susu312
--  发布时间:2018/9/15 12:18:00
--  关于辅助列排序


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

 

老师,我现在是基于辅助列排序的,实际上绥德县支行属于榆林市中心支行,

 

 

想要的效果是:

                   西安分行

                   榆林市中心支行

                   绥德县支行

                   汉中市中心支行

 

在榆林市中心支行之后显示完它所有的下属单位,再显示别的单位?

 

 

Dim dt1 As DataTable = DataTables("organList")
For Each dr1 As DataRow In dt1.datarows
    If dr1.IsNull("superName") Then
        dr1("fuZhu") = format(dr1("_Identify"), "000")
        Functions.Execute("AddChildren1",dr1,dt1)
    End If
Next
Tables("organList").sort = "fuZhu"

 

我觉得没问题呀,应该是对着呢?

 

 

已搞定,没问题。

[此贴子已经被作者于2018/9/15 12:28:51编辑过]