Record variable

A

Allen Browne

Pass the Recordset.

In this example, ShowIt() prints the value of the ID field of the current
record from Table1:

Function Test()
Dim rs As DAO.Recordset
Set rs = dbengine(0)(0).OpenRecordset("Table1")
Call ShowIt(rs)
rs.Close
End Sub

Function ShowIt(rs As DAO.Recordset)
Debug.Print rs!ID
End Function
 
S

Steve M

Thanks Allen. However is there a way I can send a single record from the
recordset?
 
A

Allen Browne

Not sure I understand what you are trying to do, Steve.
Perhaps someone else does.
 
Top