Intento no válido de FieldCount cuando el lector está cerrado.

[RootK]

Y donde estas definiendo tu objeto connection ??

Public Function Llenar_Familias(intpadre As String) As OledbDataReader
??????? y objConn ??

' Definimos el comando que trae los datos mediante un store procedure llamado spfamilias
Dim ObjCmd As New OleDbCommand ("sppadre", ObjConn)

Salu2