如何超级列表框通过sfz号获取年龄？

xf702

请问一下，超级列表框做的花名册，比如sfz号在第5列，年龄在第3列，如何通过sfz号码获取年龄呢？需要循环取，人数可能有1000人。。。

Mr、Darren

https://bbs.125.la/forum.php?mod ... =%E5%B9%B4%E9%BE%84你也可以看下这个帖子

  

子程序名	返回值类型	公开	备 注
SFZ_取年龄	整数型		过生日（包含当天）以后算周岁//以免出现年龄误差
参数名	类 型	参考	可空	数组	备 注
ID	文本型				身份证号

变量名	类 型	静态	数组	备 注
年	整数型
月	整数型
日	整数型

年 ＝ 到整数 (取文本中间 (ID, 7, 4))
月 ＝ 到整数 (取文本中间 (ID, 11, 2))
日 ＝ 到整数 (取文本中间 (ID, 13, 2))
如果 (月 ＜ 取月份 (取现行时间 ()))
返回 (取年份 (取现行时间 ()) － 年)

如果 (月 ＝ 取月份 (取现行时间 ()) 且 日 ＜ 取日 (取现行时间 ()))
返回 (取年份 (取现行时间 ()) － 年)

如果 (月 ＝ 取月份 (取现行时间 ()) 且 日 ≥ 取日 (取现行时间 ()))
返回 (取年份 (取现行时间 ()) － 年 － 1)

如果 (月 ＞ 取月份 (取现行时间 ()))
返回 (取年份 (取现行时间 ()) － 年 － 1)
返回 (1111)

.版本 2<br /> <br /> .子程序 SFZ_取年龄, 整数型, , 过生日（包含当天）以后算周岁//以免出现年龄误差<br /> .参数 ID, 文本型, , 身份证号<br /> .局部变量 年, 整数型<br /> .局部变量 月, 整数型<br /> .局部变量 日, 整数型<br /> <br /> 年 ＝ 到整数 (取文本中间 (ID, 7, 4))<br /> 月 ＝ 到整数 (取文本中间 (ID, 11, 2))<br /> 日 ＝ 到整数 (取文本中间 (ID, 13, 2))<br /> .如果 (月 ＜ 取月份 (取现行时间 ()))<br />     返回 (取年份 (取现行时间 ()) － 年)<br /> <br /> .否则<br />     .如果 (月 ＝ 取月份 (取现行时间 ()) 且 日 ＜ 取日 (取现行时间 ()))<br />         返回 (取年份 (取现行时间 ()) － 年)<br /> <br />     .否则<br />         .如果 (月 ＝ 取月份 (取现行时间 ()) 且 日 ≥ 取日 (取现行时间 ()))<br />             返回 (取年份 (取现行时间 ()) － 年 － 1)<br /> <br />         .否则<br />             .如果 (月 ＞ 取月份 (取现行时间 ()))<br />                 返回 (取年份 (取现行时间 ()) － 年 － 1)<br />             .否则<br />                 返回 (1111)<br />             .如果结束<br /> <br />         .如果结束<br /> <br />     .如果结束<br /> <br /> .如果结束

风度猫

.版本 2
.支持库 iext

局_索引 ＝ 超级列表框2.查找表项 (“sfz号”, , , 5)
你要的 ＝ 超级列表框2.取标题 (局_索引, 3)

Mr、Darren

https://bbs.125.la/search.php?mo ... =%E5%B9%B4%E9%BE%84你可以看下 有很多

噌经滴承诺

方案1.SFZ号是可以计算出年龄的
方案2.加载的时候用一个自定义数据数组的变量来存列表里面的数据，这样计算会更快，1秒不到
方案3.列表循环，这个就是速度慢，但对于这1000个列表数据来说小意思，如果是2000条以上的列表数据，建议用以上两条方案

赤璃琴殇

表项=超级列表框1.查找表项（sfz号，4）’找到sfz号所在的表项
姓名=超级列表框1.取标题（表项，2）‘取出这个表项的第三列的标题

开水养鱼

取出身份证号中 出生日期  在取时间间隔 现行时间减出生日期

xf702

Mr、Darren 发表于 2023-12-9 00:44
https://bbs.125.la/forum.php?mod=viewthread&tid=14804561&highlight=%E5%B9%B4%E9%BE%84你也可以看下这 ...

这个很好，把年龄取出来了，我想通过第5列的sfz号，循环计算出数字后，得出数字（比如30）后，写到第3列的年龄中，一一对应。该怎么写了？

补充内容 (2023-12-9 13:03):
另外一个，感觉年龄好像不能自动更新。。