Foxtable(狐表)用户栏目专家坐堂 → [求助]神奇的排序


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

主题:[求助]神奇的排序

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


加好友 发短信
等级:幼狐 帖子:170 积分:1195 威望:0 精华:0 注册:2016/2/21 18:26:00
[求助]神奇的排序  发帖心情 Post By:2016/9/20 21:21:00 [显示全部帖子]

在序号列里为了出现变化时能自动更新编号编写了一下代码,开始用时没问题,放在datacolchanged或者自制的  保存 按钮里都挺好

但是在进行了一系列的克隆行,移动行之后,序号就乱了,再执行代码就改不过来了,(新增行代码还是对的)同步行也没效果,难道还自带记忆功能

了???我明明没用_Identify啊,老师求解图片点击可在新窗口打开查看

 

Dim m As Integer =DataTables("人员信息管理").DataRows.Count-1
For i As Integer =0 To m
DataTables("人员信息管理").dataRows(i)("序号") =i+1
Next


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


加好友 发短信
等级:幼狐 帖子:170 积分:1195 威望:0 精华:0 注册:2016/2/21 18:26:00
  发帖心情 Post By:2016/9/20 21:47:00 [显示全部帖子]

但是我放到自设的保存按钮里序号还是没有恢复啊,这是怎么回事呢~~~关键是删了代码重新编号,代码放在按钮里执行后依然变回乱序,请老师教一下解决办法图片点击可在新窗口打开查看

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


加好友 发短信
等级:幼狐 帖子:170 积分:1195 威望:0 精华:0 注册:2016/2/21 18:26:00
  发帖心情 Post By:2016/9/21 13:29:00 [显示全部帖子]

感谢大家的指导,我删了重做一遍就好了~~~~~图片点击可在新窗口打开查看

 回到顶部