Separating Date and Time into Two Input Fields

[Chris1112]

I'm trying to separate a single general date field into a "date" and "time" field on a form. When I use "1stWalkDate: Format([1stWalk],"dd/mm/yy")" in a query, the field is no longer updateable.



Ideally I would like to use the date picker along with a 30-minute interval time combo box.

Thanks in advance.

[pbaldy]

What I do is put the two values into the textboxes when I load the record (this happens to be from a recordset):

Forms!frmreservation.txtReqDate = DateValue(rst!ReqDateTime)
Forms!frmreservation.txtReqTime = TimeValue(rst!ReqDateTime)

and put them back together (this presumes a form with a bound date/time field):

Me.ReqDateTime = DateValue(Me.txtReqDate) + TimeValue(Me.txtReqTime)

[Chris1112]

Thanks Paul,

For your values, I'm assuming you keep a hidden text field to display the date and time, separate it into two text boxes, then use the After Update event to recombine them?

Thanks

[pbaldy]

Yes, the after update event of both the date and time controls.

[Chris1112]

Sorry for slow reply, but I'm having issues with this. Where should the textbox values be set? I've tried on form load and every record receives the value from the first record. None of the events of the textbox itself seem to be useful for this.

Thanks

[pbaldy]

Sorry for the delay; was sick as a dog yesterday. Try the current event to load the values.

[Chris1112]

Thanks Paul. Really appreciate the help.

Having an issue now though. The form is continuous and every record is populated with the same information. The specific code I'm using is:

Private Sub Form_Current()    If IsDate([Stage5Walk1]) Then
        Me.txtStage5Date = DateValue([Stage5Walk1])
        Me.txtStage5Time = TimeValue([Stage5Walk1])
    End If
End Sub

[pbaldy]

I assume those two textboxes are unbound, so you would see that behavior on a continuous or datasheet form. I've only used this technique on forms in single view. Offhand, I'm not sure how you could get around it on a continuous form, without creating fields to bind those textboxes to.

[Chris1112]

Thanks again for the help Paul.

What I've done to get around this is created an unbound text field. I then check for day, time, and year then put it all back together. It seems to work fairly well. I'm sure someone can break it since I can't account for everything, and I know it's not optimal or best practices, but it does work.