計算二個日期經過幾月又幾天

若要計算二個日期經過幾月又幾天，需要考慮期間每個月份的天數，每個月的天數是不一樣的。
所以我們可以先計算經過幾個月，然後把起始日期累加異差月份數，再計算差異天數。

        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))