Pass a query's field Value to Function

[samn265]

Could anyone tell me how to pass the value of one field in a query back to a function? I.e. I have the following function:

Public Function InitialDate() As Date
InitialDate = DateSerial(2001, 7, 1)
MsgBox [InitialDate]
End Function

I would like to assign the "InitialDate" to get its value from a field in a query instead of what I have in the above example.
Any help is greatly appreciated.
Thanks

 

[MichaelRed]

Public Function InitialDate() As Date
    InitialDate = rst![i]MyDateField[/i]
    MsgBox [InitialDate]
End Function

Where rst ~~ the query recordset /resultset.


MichaelRed
m.red@att.net

There is never time to do it right but there is always time to do it over