CODEWITHSUNDEEP
vb.netdateleap-year
shmink
shmink

Reputation: 301

Can you force values into the Date type?

I've come across a bug where the expedient solution would be to somehow force certain values into the Date type.

It would include being able to do the following Dim myDate As Date = New Date(1900, 2, 29).

The 29th of February is a leap day but 1900 is not a leap year, therefore, this is not a valid date and it doesn't allow it to even be created. Is there a way you can create it with these values?

Upvotes: 1

Views: 86

Answers (3)

Mary
Mary

Reputation: 15091

There are lots of fun methods in DateTime.

Private Function GetLastDayInFebruary(YearToTest As Integer) As Integer
    Return Date.DaysInMonth(YearToTest, 2)
End Function

Upvotes: 0

jmoreno
jmoreno

Reputation: 13571

DateTime is basically a wrapper around a number. You can't force an incorrect date into it any more than you can force a bad number into an integer. Any value it has represents some valid date. So even if you could use new Date(1900, 2, 30) and not get an exception, the result would not be Feb 30, 1900, but some other valid date.

Upvotes: 0

Paulo Lima
Paulo Lima

Reputation: 192

You can't force an invalid date into a System.DateTime. Have a look here: https://learn.microsoft.com/en-us/dotnet/api/system.datetime?view=netframework-4.8

Why don't you use the Date.IsLeapYear(1900) to check which date value you should set?

Here are 2 examples:

    Dim myDate As Date
    Dim myYear As Integer = 1900
    If Date.IsLeapYear(myYear) Then
        myDate = New Date(1900, 2, 28)
    Else
        myDate = New Date(1900, 2, 29)
    End If

    Dim myDate2 As Date
    Dim myYear2 As Integer = 1900
    If Date.IsLeapYear(myYear2) Then
        myDate2 = New Date(1900, 3, 1)
    Else
        myDate2 = New Date(1900, 2, 29)
    End If

Upvotes: 5

Related Questions