posts - 71, comments - 301, trackbacks - 22, articles - 0
  博客园 :: 首页 :: 新随笔 :: 联系 :: 订阅 订阅 :: 管理

计算二个日期经过几月又几天

Posted on 2008-06-18 20:01 jeff377 阅读(194) 评论(0)  编辑 收藏 所属分类: VB.NET
若要计算二个日期经过几月又几天，需要考虑期间每个月份的天数，每个月的天数是不一样的。
所以我们可以先计算经过几个月，然后把起始日期累加异差月份数，再计算差异天数。

        Dim oDate1 As Date = Date.Parse("2008/5/1")
        Dim oDate2 As Date = Date.Parse("2008/7/10")

        '先算月份
        Dim iMonths As Integer = DateDiff(DateInterval.Month, oDate1, oDate2)
        '再算天数
        Dim iDays As Integer = DateDiff(DateInterval.Day, DateAdd(DateInterval.Month, iMonths, oDate1), oDate2)

        MsgBox(String.Format("经过{0}月{1}天", iMonths, iDays))

标题  
姓名  
主页
Email (博主才能看到) 
验证码 *  看不清,换一张 [登录][注册]
内容(请不要发表任何与政治相关的内容)  
网站首页

新闻频道

社区

小组

博问

网摘

闪存

找找看
  登录  使用高级评论  新用户注册  返回页首  恢复上次提交      


相关链接:

最新IT新闻:
开心网即将启用”shejiao.com”?
Google股价跌破329美元 61%员工期权价值归零
十年祭:昔日明星软件今何在?
六大可能出售IT企业名单：SUN领头或被猎走
Linux内核2.6.27正式到来