这样的算法如何解决？

xfaw · 发表于 2008-4-9 08:59:58

提示: 作者被禁止或删除内容自动屏蔽

tmtony · 发表于 2008-4-9 09:17:50

通过筛选病员号,按入院日期排序,然后取最近连续两次入院日期和出院日期,使用datediff来取得间隔

xieyimin008 · 发表于 2008-4-9 11:42:45

好帖学习中

xfaw · 发表于 2008-4-13 11:49:06

提示: 作者被禁止或删除内容自动屏蔽

xfaw · 发表于 2008-4-13 18:13:02

提示: 作者被禁止或删除内容自动屏蔽

tmtony · 发表于 2008-4-13 18:13:33

假如表中有如下字段
病人编号入院日期出院日期
dim rs as new adodb.recordset
dim datLastDate as date
rs.open "select * from 住院表",currentproject.connection,1,3
do while not rs.eof
  if nz(datLastDate)<>"" then
   msgbox "时间间隔" & datediff("d",datLastDate,rs("入院日期"))
   datLastDate=datLastDate,rs("出院日期")
  else
   datLastDate=datLastDate,rs("出院日期")
  end if
  rs.movenext
loop

大致是这样的代码,具体要你自己改一下了

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

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

xfaw xfaw 当前离线技术点技术点 V币点积分 143 IP卡狗仔卡	电梯直达 1^# 发表于 2008-4-9 08:59:58 \| 只看该作者 \|倒序浏览 \|阅读模式提示: 作者被禁止或删除内容自动屏蔽
xfaw xfaw 当前离线技术点技术点 V币点积分 143 IP卡狗仔卡	分享到: QQ好友和群 QQ空间腾讯微博腾讯朋友收藏0 分享淘帖0 订阅
	回复使用道具举报提升卡置顶卡沉默卡喧嚣卡变色卡抢沙发千斤顶显身卡

xfaw xfaw 当前离线技术点技术点 V币点积分 143 IP卡狗仔卡	4^# 楼主\| 发表于 2008-4-13 11:49:06 \| 只看该作者提示: 作者被禁止或删除内容自动屏蔽
xfaw xfaw 当前离线技术点技术点 V币点积分 143 IP卡狗仔卡
	回复支持反对使用道具举报显身卡

xfaw xfaw 当前离线技术点技术点 V币点积分 143 IP卡狗仔卡	5^# 楼主\| 发表于 2008-4-13 18:13:02 \| 只看该作者提示: 作者被禁止或删除内容自动屏蔽
xfaw xfaw 当前离线技术点技术点 V币点积分 143 IP卡狗仔卡
	回复支持反对使用道具举报显身卡

主题相关群

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

[模块/函数] 这样的算法如何解决？

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