Visual Basic - Problema con datacombo

Aqui les pongo el problema que tengo con un datacombo

Dim objRec As New ADODB.Recordset
objRec.Open "supervision", cnsistpresupuesto, adOpenDynamic, adLockPessimistic
'Control Datacombo
Set DataCombo3.RowSource = objRec
DataCombo3.ListField = "apellido"
DataCombo3.DataField = objRec
Set DataCombo3.DataSource = objRec
Esto esta puesto en el load del formulario para cargar un datacombo
1 Me da error en la propiedad RowSource no lo reconoce
2 Tampoco lista los apellidos.
Estoy un poco mareado porque en un principio no me da el error 1, pero me mostraba el primer registro de la tabla y no listaba el resto de la tabla.
Bueno gracias de antemano por la ayuda y que Dios los bendiga.- Me tiene detenido hace varios dias este tema

Prueba esto en la linea donde dice "supervision" cambiala y pon esto "SELECT * FROM SUPERVISION" esto te permite visualizar todos los registros de la tabla y en la propiedad Boundcolum agrega el campo que deseas que se liste osea BoundColum=Campo a listar del DataCombo