Foxtable(狐表)用户栏目专家坐堂 → 如何干预排序?


  共有76人关注过本帖树形打印复制链接

主题:如何干预排序?

帅哥哟,离线,有人找我吗?
rogen
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:588 积分:4838 威望:0 精华:0 注册:2015/11/22 10:28:00
如何干预排序?  发帖心情 Post By:2024/12/26 11:00:00 [只看该作者]

有个排产表,排产序号字段会手工填写顺序号:1、2、3 之类的
对于没有参加排序的,排产序号就是空着的
首先是想根据排产序号作一个123的排序
但序号为空的就自动排在最上面了
尝试将空序号的move到下面,但提示排序状态下不能移动行
请问有啥办法能在系统排序后,手动调整行的顺序?

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111414 积分:567140 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/12/26 11:33:00 [只看该作者]

勾选插入行标记列即可:http://www.foxtable.com/webhelp/topics/1791.htm

 回到顶部
帅哥哟,离线,有人找我吗?
rogen
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:588 积分:4838 威望:0 精华:0 注册:2015/11/22 10:28:00
  发帖心情 Post By:2024/12/26 11:51:00 [只看该作者]

插入行标记勾选了,在排序状态下还是不能move行呢
移动行代码为:

Dim mxt As Table = Tables("投产明细表")
For i As Integer = mxt.Rows.Count - 1 To 0 Step - 1
    Dim mxr As Row = mxt.Rows(i)
    If mxr.IsNull("序号") = True Then
        mxr.Move(mxt.Rows.Count - 1)
    End If 
Next

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111414 积分:567140 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/12/26 12:07:00 [只看该作者]

不能在排序状态下移动行。这种情况只能是全部按需要的顺序移动所有行到合适的位置

 回到顶部