vb图书借阅系统

来源:百度知道 编辑:UC知道 时间:2024/05/16 16:10:50
我现在想实现的是如果一个今天借书,他只能接20天,如果超过一天0.5元
到他还书为止。。该怎么做???
请各位帮帮忙!!
谢谢~~~~

用一个datediff就可以了,这个函数返回的是开始时间距离现在有多久了,具体做法如下
n=datediff("d",借书时间,now)'的表示一天为单位
if n>20 then
price=(n-20)*0.5
end if

添加一个还书日期的字段,每次取出字段与当前时间做对比,如果超过借书日期则计算罚款的金额,否则不做判断。