最新国产好看的视频,伊人天堂AV在线,国产Aaaaaa视频,蜜臀视频在线观看一区,人妻av色图,密臀久久久精品影片,青青视频免费观看毛片,久草在线观看视,国产三级精品色情在线

如何計(jì)算出當(dāng)前日期屬于定義時(shí)間段內(nèi)的第幾星期?

 更新時(shí)間:2006年11月16日 00:00:00   作者:  

如何計(jì)算出當(dāng)前日期屬于定義時(shí)間段內(nèi)的第幾星期?

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]

相關(guān)文章

最新評論

乌拉特前旗| 肃南| 淳化县| 湘阴县| 西华县| 临漳县| 兴隆县| 新丰县| 房产| 启东市| 南木林县| 崇阳县| 陕西省| 桂阳县| 常熟市| 永修县| 南丰县| 泗阳县| 济宁市| 罗城| 石阡县| 湖南省| 赤峰市| 锡林郭勒盟| 衡山县| 顺平县| 宽城| 商城县| 凤阳县| 松桃| 梁河县| 肃南| 富锦市| 南汇区| 鲁甸县| 岳阳市| 富顺县| 泸州市| 黄梅县| 武胜县| 民丰县|