Foxtable(狐表) → 用户栏目 → 专家坐堂 → 调整行的位置


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

主题：调整行的位置
帅哥，在线噢！
15666282205
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：541 积分：4291 威望：0 精华：0 注册：2019/1/13 10:12:00 		调整行的位置  发帖心情 Post By：2023/9/5 18:03:00 [只看该作者]

老师，考勤表里根据考勤员筛选显示职工，想把职工的排序用手工调一下，设计一个上箭头和一个下箭头按钮，如何编写按钮的代码实现当前行用按钮调整位置呢？

 回到顶部
帅哥，在线噢！
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110769 积分：563777 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2023/9/5 20:13:00 [只看该作者]

参考：http://www.foxtable.com/webhelp/topics/1846.htm。需要开启插入行标记：http://www.foxtable.com/webhelp/topics/1791.htm

上移一行
With CurrentTable
    .Current.Move(.Position - 1)
End With

下移一行
With CurrentTable
    .Current.Move(.Position + 1)
End With
 回到顶部
帅哥，在线噢！
15666282205
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：541 积分：4291 威望：0 精华：0 注册：2019/1/13 10:12:00 		  发帖心情 Post By：2023/11/4 15:54:00 [只看该作者]

老师，上面的代码排序以后，再打开又恢复原样了。能不能直接把datatable数据库里的顺序修改呢？

 回到顶部
帅哥，在线噢！
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110769 积分：563777 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2023/11/4 16:33:00 [只看该作者]

排序以后保存一下表格

 回到顶部
帅哥，在线噢！
15666282205
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：541 积分：4291 威望：0 精华：0 注册：2019/1/13 10:12:00 		  发帖心情 Post By：2023/11/6 8:35:00 [只看该作者]

老师，排序后保存也不行。我研究了一下，打开表的时候根据Identify自动排序，如果想实现行的移动，应该把行的内容直接和另一行交换复制，Identify不变，内容变。怎么写代码呢？

 回到顶部
帅哥，在线噢！
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110769 积分：563777 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2023/11/6 8:45:00 [只看该作者]

不可能。如果开启插入行标记，表格默认肯定是根据插入行标记也就是_sortkey列排序的

 回到顶部
帅哥，在线噢！
15666282205
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：541 积分：4291 威望：0 精华：0 注册：2019/1/13 10:12:00 		  发帖心情 Post By：2023/11/6 9:06:00 [只看该作者]

老师，我是先筛选，然后
'----------------------------------------自动排序----------------------------------
Tables("当月考勤表2").Sort = "_Identify"
然后再重新排序，现在的问题是排序不能记忆
 回到顶部
帅哥，在线噢！
有点蓝
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110769 积分：563777 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2023/11/6 9:20:00 [只看该作者]

2楼的方式才可以保存。

任何使用代码排序都是临时性的。需要的时候每次都得调用代码
 回到顶部
帅哥，在线噢！
15666282205
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：541 积分：4291 威望：0 精华：0 注册：2019/1/13 10:12:00 		  发帖心情 Post By：2023/11/6 9:32:00 [只看该作者]

我就是用2楼的代码调整顺序，也点保存了，可是重新打开程序的时候不能记忆，恢复原样了
 回到顶部
帅哥，在线噢！
有点蓝
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110769 积分：563777 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2023/11/6 9:38:00 [只看该作者]

去掉下面代码啊，执行了代码肯定是按照代码排序的

Tables("当月考勤表2").Sort = "_Identify"
 回到顶部
总数 16 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.06250 秒, 4 次数据查询