设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

12下一页
返回列表 发新帖
查看: 6729|回复: 13
打印 上一主题 下一主题

[模块/函数] 如何实现家谱垂丝图(吊线图)

[复制链接]
跳转到指定楼层
1#
发表于 2021-4-24 20:51:10 | 只看该作者 回帖奖励 |正序浏览 |阅读模式
本帖最后由 付谦 于 2021-4-25 14:14 编辑

现在的树是横式的,但家谱习惯是垂丝图(或叫吊线图),也不是宝塔图,在网上都是些手动制作垂丝图(或叫吊线图)操作,几万记录要做完要多长时间,还要人工校对,一旦有变动,前功尽失,本人知识太少,因此向各位大师们恳求自动生成家谱垂丝图(吊线图)代码,无论是用窗体.报表或WORD,EXCEL都行,只要能达到附件上注的效果.谢谢!

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
14#
发表于 2021-4-30 14:04:28 | 只看该作者

完美结果上传一份与大家分享一下。
13#
发表于 2021-4-27 15:35:38 | 只看该作者
完美结果上传一份与大家分享一下。
12#
 楼主| 发表于 2021-4-27 13:56:04 | 只看该作者
递归过程代码中,表名有一处未改所致
11#
 楼主| 发表于 2021-4-27 09:34:23 | 只看该作者
按照大师指明的方向,我在递归过程代码中找出有一个表名没改,程序不断调用此表数据,现在正常了,速度比前也快了
10#
发表于 2021-4-26 22:23:02 | 只看该作者
应该与visio没有关系:
1,看看第九世的承上码是不是跟visio的连接线一致,你可以把代码/承上码/姓名一起输出到visio,便于检查逻辑
2,在treeview中检查是否符合逻辑,
2,看看有没有公共变量混进了递归过程
3,看看父子关系是不是有错误
如有必要,可以加我QQ:853156456
9#
 楼主| 发表于 2021-4-26 20:07:00 | 只看该作者
大师:
  发现一个问题,按条件只有8世,但有时出现18世,不知从何而来,查这次的数据源也只有8世,多的是过去曾使用过的数据,承上码在8世内.我分析是visio系统或内存中保存有永久数据,只要对上自动连接上了.我不知系统或内存数据如何清除.加了 Set Rec = Nothing不管用,请教如何处理?
8#
发表于 2021-4-26 17:22:40 | 只看该作者
本帖最后由 aslxt 于 2021-4-26 17:24 编辑
付谦 发表于 2021-4-26 16:05
ASLXT大师真厉害,知识广,乐助人!
代码经运行好用,虽然过去没有接触visio,抓紧学习,在大师的基础上再细化一 ...

惭愧,我不是大师,只是恰好在不久前做了同样的东西而已.
7#
 楼主| 发表于 2021-4-26 16:05:31 | 只看该作者
ASLXT大师真厉害,知识广,乐助人!
代码经运行好用,虽然过去没有接触visio,抓紧学习,在大师的基础上再细化一下,完全满足所需.
6#
发表于 2021-4-26 11:46:02 | 只看该作者
access结合visio,厉害了!
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2025-5-20 01:04 , Processed in 0.105088 second(s), 35 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表