Passing a Recordset Field to a Sub
Posted on 2001-06-12
I call my PutDate function this way:
PutDate rstThisPatient("DateFirstConsulted"), _ txtMedicalDateFirstConsulted
The PutDate Sub looks like this (it's called from many different forms):
Public Sub PutDate(dateField As String, dateToOutput As String)
If dateToOutput = "" Then
dateField = "12/31/1899"
dateField = dateToOutput
If I set the date in the TextBox to 1/1/2000 and trace it through PutDate, I see dateField being changed from 12/31/99 to 1/1/2000, just fine. But when I get to the next instruction after the call to PutDate, I see the rstThisPatient("DateFirstConsulted") field still sitting at the original 12/31/99.
Obviously, "dateField" in PutDate is not rstThisPatient("DateFirstConsulted"), but why not?