本文介绍了如何在 VBScript 中计算每月的最后一个工作日的处理方法，对大家解决问题具有一定的参考价值，需要的朋友们下面随着小编来一起学习吧！
问题描述
如何在 VBScript 中计算每月的最后一个工作日?它用于 Reporting Services 报告.
How do I calculate the last business day of month in VBScript? It is for a Reporting Services report.
谢谢
推荐答案
怎么样:
intMonth=11
'Use zero to return last day of previous month '
LastDayOfMonth= dateserial(2008,intMonth+1,0)
'Saturday '
If WeekDay(LastDayOfMonth,1)=7 Then LastDayOfMonth=LastDayOfMonth-1
'Sunday '
If WeekDay(LastDayOfMonth,1)=1 Then LastDayOfMonth=LastDayOfMonth-2
Msgbox LastDayOfMonth & " " & Weekdayname(Weekday(LastDayOfMonth,1),1)
这篇关于如何在 VBScript 中计算每月的最后一个工作日的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！