如何按树的上下顺序重新编号

付谦 · 发表于 2021-4-9 14:10:47

本帖最后由付谦于 2021-4-10 08:03 编辑

见附件
表记录字段:族人代码,承上码,世代,姓名,重编号
从前表记录是按照世代的先后顺序编号的(族人代码),现在想按照树的上下顺序重新编个号,为此在表中建立了重编号字段,点击"按树上下顺序编号"命令按钮,实现重编号字段是按树上下顺序编的号,如1,2,3......

网上说用递归可以做到,我对递归知识一点不懂,无从入手.请高手帮助

付谦 · 发表于 2021-4-11 12:15:48

本帖最后由付谦于 2021-4-11 12:17 编辑

谢ASLXT!就是要这效果.
因我是64位系统,模块中Public Declare Function timeGetTime Lib "winmm.dll" () As Long　为红色,
提示curNode未定义,
树也加载不了,
我不知道语句如何改,
请继续帮助

付谦 · 发表于 2021-4-11 14:18:52

加上PtrSafe,改成　Public Declare PtrSafe Function timeGetTime Lib "winmm.dll" () As Long　可以了
再次感谢ASLXT!

付谦 · 发表于 2021-4-11 16:17:28

ASLXT大师:
　　我树图共19000条记录,按上述方法共花了21分钟,是否还有其他方法提高速度?

付谦 · 发表于 2021-4-11 17:47:31

递归不会,大师能否帮助,谢!

付谦 · 发表于 2021-4-12 09:07:49

感谢aslxt 大师助人为乐!帮我解决了大难题

付谦 · 发表于 2021-4-12 09:08:12

感谢aslxt 大师助人为乐!帮我解决了大难题

付谦 · 发表于 2021-4-12 09:09:12

感谢aslxt 大师助人为乐!帮我解决了大难题

付谦 · 发表于 2021-4-12 09:11:05

感谢aslxt 大师助人为乐!帮我解决了大难题

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[ActiveX] 如何按树的上下顺序重新编号

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)