Work with Date

[Bruno]

How do I check if a date variable is empty?

I mean, if I declare a variable like this

dim d as Date

how do I know if any date was assigned to d?

example,
d = now

I am currently using

if d.tostring = "01/01/0001 12:00:00 AM" then
'its empty
end if

but if the UICulture is different from en-US, it won't work....

is there any good way to check this?

Thanks,
Bruno

 

[Mohamoss]

Hi Bruno
What is set in a data object first when it is initialized is a value called
"the minimum value "which is "01/01/0001 12:00:00 AM" for en. There is
always a property with the data object (read only property ) that can
return this minimum value .
What you can do and work with every culture is to compare the value with
in your date object to its minimum value (using the compareto function) if
the returned value is 0 then the date object is still on its initial value.
And this will work with whatever culture.
Basically you would have something like this
Dim k As Date
If (k.CompareTo(k.MinValue) = 0) Then ' means date still on its
intital value
MessageBox.Show(" the date is not set")

End If
Hope that is ok solution with you .
Mohamed M .Mahfouz
Developer Support Engineer
ITWorx on behalf of Microsoft EMEA GTSC