Strange Date

[gchichester via AccessMonster.com]

Any idea why this short script would display just the time?

Private Sub DispatchHeaderPort_GotFocus()
Dim SDate As Date
MsgBox SDate
End Sub

Please see screenshot in my Gallery

Thanks
Gil

 

[Jon Lewis]

Because Dim SDate As Date is preparing some space in memory for some data of
the type Date, but you are not actually supplying the data.

You need:
Dim SDate As Date
SDate = Date
MsgBox SDate

or just

MsgBox Date

HTH

 

[gchichester via AccessMonster.com]

Jon,

Thanks for pointing out the obvious.
My bad for not including the value from a field on my form.
Gil

Because Dim SDate As Date is preparing some space in memory for some data of
the type Date, but you are not actually supplying the data.

You need:
Dim SDate As Date
SDate = Date
MsgBox SDate

or just

MsgBox Date

HTH

Any idea why this short script would display just the time?

[quoted text clipped - 7 lines]

Thanks
Gil