Default Value in field

Topic

New Reply

Hi, on a form I have a tick box and a field for a completion date. I would like the date field to auto fill with the current date when the tick box is set to yes and clear when not. what would be the best way of modeeling this?

Many thanks, Darren.

Reply | Quote

Replies

In the AfterUpdate event of the checkbox use the following code:

Code:

Private Sub Check0_AfterUpdate()
If Me.Check0 = True Then
	Me.Text2 = Date
Else
	Me.Text2 = ""
End If
End Sub

Replace Text2 and Check0 with the names of your controls.

Reply | Quote

Thank you Francois

Darren.

Reply | Quote