Prueba asi en caso quieras descargar el recordset creo que este caso el objeto a cerrar y descargar seria asi DataEnvironment1.CheckinoutMaes.recordsert no estoy seguro
pero puedes probar de diferentes formas, yo tampoco manejo bien el DataEnvironment.
Código:
Private Sub Form_Unload(Cancel As Integer)
' cierra los recordset
If Not DataEnvironment1.CheckinoutMaes.recordsert Is Nothing Then
DataEnvironment1.CheckinoutMaes.recordsert .Close
Set DataEnvironment1.CheckinoutMaes.recordsert = Nothing
End If
End Sub