DateDiff() returns value 0?

[fluffyvampirekitten]

I'm trying to calculate the number of dates between StartRange and EndRange
However, when I use DateDiff() , I get return value 0

Eg, 1/11/2015 to 1/11/2015
Message box will display value "0"

Any ideas where went wrong ?
Thanks in advance

StartRange = CDate(cboStartRange)
    EndRange = CDate(cboEndRange)
    UpdateSQL = "Update Setting Set Start_Range = '" & StartRange & "', End_Range = '" & EndRange & "' Where Type = 'SUMMARY_RANGE'"
    
    
    'Calculate MONTHS
    Dim intmonths As Integer
    
   ' intmonths = DateDiff("m", StartRange, EndRange) + 1
    intmonths = DateDiff("m", StartRange, EndRange)
    'intmonths = DateDiff("m", StartRange, EndRange)
    MsgBox intmonths

[pbaldy]

Seems correct to me. How many months would you expect using the same date?

[fluffyvampirekitten]

I realized its correct ! HAHAH ops.

Then how to count
1/11/2015 to 1/11/2015 as 1 month ?
or June 2015 to Nov 2015 as 6 months ?
Can I still use datediff?

[pbaldy]

How does the commented-out line that adds one do?

[fluffyvampirekitten]

actually I don't know . I just anyhow add one