zoukankan      html  css  js  c++  java
  • VFP_获得:月天数.月初日期.月末日期及两个日期之间天数.月数.年数(十豆三)

    Clear


    ldDate=Date()
    ldDateB={^2004/02/29}
    ldDateE={^2005/02/28}


    *--月天数
    ?"月天数",32-Day(ldDate-Day(ldDate)+32)


    *--月初日期
    ?"月初日期",ldDate-Day(ldDate)+1
    ?"月初日期",Date(Year(ldDate),Month(ldDate),1)


    *--月末日期
    ?"月末日期",Gomonth(ldDate-Day(ldDate)+1,1)-1
    ?"月末日期",Gomonth(ldDate,1)-Day(Gomonth(ldDate,1))
    ?"月末日期",ldDate-Day(ldDate)+32-Day(ldDate-Day(ldDate)+32)
    ?"月末日期",Date(Year(Gomonth(ldDate,1)),Month(Gomonth(ldDate,1)),1)-1


    *--两个日期之间天数(Max是防止ldDateE小于ldDateB)
    ?"两个日期之间天数",Max(ldDateE-ldDateB,0)


    *--两个日期之间月数(Max是防止ldDateE小于ldDateB)
    ?"两个日期之间月数",Max((Year(ldDateE)-Year(ldDateB))*12+Month(ldDateE)-(Month(ldDateB)+Iif((Day(ldDateE)<Day(ldDateB) And Day(ldDateE+1)>1),1,0)),0)


    *--两个日期之间年数,可以用于计算年龄(Max是防止ldDateE小于ldDateB)
    ?"两个日期之间年数",Max(Year(ldDateE)-Year(ldDateB)-Iif(Gomonth(ldDateB,(Year(ldDateE)-Year(ldDateB))*12)>ldDateE,1,0),0)
    ?"两个日期之间年数",Max(Int(((Year(ldDateE)-Year(ldDateB))*12+Month(ldDateE)-(Month(ldDateB)+Iif((Day(ldDateE)<Day(ldDateB) And Day(ldDateE+1)>1),1,0)))/12),0)
  • 相关阅读:
    React学习笔记
    士兵杀敌(一)
    网络爬虫Java实现抓取网页内容
    德莱联盟
    计算球体积
    在页面上 获取键盘事件
    一起玩转mysql
    腾讯云 做出的 不错的 动画 chrome小插件
    jquery MD5
    json to xml
  • 原文地址:https://www.cnblogs.com/szytwo/p/2264073.html
Copyright © 2011-2022 走看看