如何计算出当前日期属于定义时间段内的第几星期？
更新时间：2006年11月16日 00:00:00 作者：
如何计算出当前日期属于定义时间段内的第几星期？
Function CalculateWeekNo(BeginDate,EndDate,InputDate)
dim wdate(500,8)
z=0
x=0
strlong=len(CStr(inputdate))-9
inputdate=cdate(left(CStr(inputdate),strlong))
for i=cdate(BeginDate) to cdate(EndDate)
if inputdate=i then
x=z
Exit For
end if
if weekday(i)=7 then
z=z+1
end if
next
CalculateWeekNo=x
end Function
[1]
相关文章
浅析Java、C/C++、JavaScript、PHP、Python分别用来开发什么?
用任何编程语言来开发程序，都是为了让计算机干活，比如编写一篇文章，下载一首MP3等，而计算机干活的CPU只认识机器的指令，所以，尽管不同的编程语言差异极大，最后都得“翻译”成CPU可以执行的机器指令2018-08-08
如何制作一个弹出式的调查窗口？...2006-11-11
如何动态添加Form项？...2006-11-11
可以让程序告诉我详细的页面错误和数据库连接错误吗？...2006-11-11
如何编写一个创建FTP站点的函数？...2006-11-11
如何创建一个PDF文件？...2006-11-11
如何自动更新导航栏？...2006-11-11
如何使用表单发送电子邮件？...2006-11-11
如何对一个文件夹进行创建和删除？...2006-11-11
如何提示用户打开Cookie？...2006-11-11
最新评论