Try It Out-Dates : Date Type « Data Type « VBA / Excel / Access / Word

1. VBA / Excel / Access / Word
2. Data Type
3. Date Type

Try It Out-Dates

 
Sub DateTest()
    Dim datDec As Date
    Dim datMay As Date
    
    datMay = #5/1/1998#
    datDec = #12/1/1998#
    
    Debug.Print DatePart("m", datDec)
    
    Debug.Print DateDiff("m", datMay, datDec)
     
    Debug.Print "August is " & DateAdd("m", 3, datMay)
End Sub

 

Related examples in the same category