计算一个月有几天并且有几个周六日的小函数

'计算一个月有几天
'参数：fYM 格式 YYYYMM
Function MonthDay(fYM)
t_Date = DateAdd("m",1,Left(fYM,4)&"-"&Right(fYM,2)&"-1")
MonthDay = Day(DateAdd("d",-1,t_Date))
End Function
'计算一个月有几个周六周日
'参数：fDate 格式 YYYYMM
Function WeekSum(fDate)
t_Day = MonthDay(fDate)
t_NDate = Left(fDate,4)&"-"&Right(fDate,2)&"-"
t_Sum = 0
For i = 1 To t_Day
  If Weekday(t_NDate&i) = 1 Or Weekday(t_NDate&i) = 7 Then
   t_Sum = t_Sum + 1
  End If
Next
WeekSum = t_Sum
End Function

计算一个月有几天并且有几个周六日的小函数相关推荐

calendar获取月份少一个月_VBA 技巧：计算一个月有多少天？
VBA 技巧:计算一个月有多少天? 问题: 有时我们需要知道一个月有多少天,或者知道最后一天是31号还是30号我们可以通过VBA代码来计算 Sub nb_days_month()'将日期传入变量,月 ...
java计算一个月有几周_java 如何获取一个月有多少周
展开全部你说需要计算一个月有多少周,若是指,一月,二月一直到十二月每个月有多少周的话,可以用32313133353236313431303231363533e59b9ee7ad94313333613 ...
一个月赚5万美元--国产共享软件开发者周奕２
一个月赚5万美元--国产共享软件开发者周奕2 编辑:未知文章来源:http://blog.csdn.net/it88blog/archive/2007/09/19/1791845.aspx 周奕还不 ...
一个月赚5万美元--国产共享软件开发者周奕３
一个月赚5万美元--国产共享软件开发者周奕3 http://blog.csdn.net/it88blog/archive/2007/09/19/1791847.aspx 共享软件如何进军海外新闻内容 ...
用python计算一个月地铁费
1.用代码计算地铁费北京地铁的公交卡有费用折扣的规则,具体是: ①每个月累计消费满100元后,下一次开始费用打8折 ②满150元后,下一次开始乘车时有5折优惠: ③支出累计达到400元后,就将不再享 ...
通过JS计算一个月有多少天
// 计算当前月份有多少天// 第一种方式 function getCountDays(){var curDate = new Date();// 获取当前月份var curMonth = curDa ...
怎么计算一个月有多少天
思路1:获取这个月的最后一天是多少号.例如如果是28日则有28天. 思路2:用下一个月的第一天减除这个月的第一天.如:"2006-08-01" 减 "2006-07-01 ...
C#计算一个月有多少天
思路1:获取这个月的最后一天是多少号.例如如果是28日则有28天. 思路2:用下一个月的第一天减除这个月的第一天.如:"2006-08-01" 减 "2006-07-01 ...
一个月赚5万美元--国产共享软件开发者周奕
程序员这个名字给许多人的第一感觉就是:埋头苦干,不抬头看路. 第一次见到周奕,正是这种感觉. 当时,我在一个好朋友的公司里,他说等会有一个程序高手会来,要给我介绍一下.不出所料,一见面,就是那种大家都 ...

计算一个月有几天并且有几个周六日的小函数

计算一个月有几天并且有几个周六日的小函数相关推荐

最新文章

热门文章