Enetering Dates and SSN

[DrewDog_21]

That's true about the blank field/checkbox issue. One way around it is to add a default date when adding a new record, using the Date(Now) function. It would look something like:

Private Sub AddRecord()

'with the ADO control
Adodc1.Recordset.AddNew
Adodc1.Recordset.Fields("DATE") = Date(Now)

'or with an ADODB recordset
myRS.AddNew
myRS.Fields("DATE") = Date(Now)

End Sub