como jalar datos de un combo box

[iseji]

He mirado tambien la parte de codigo que tienes tu y puede ser que el fallo este en que no hay union entre tu objeto connection y el command que te he dicho yo que crees.
Si es eso, hay que añadir una linia mas.

Resumiendo debe quedar asi:

Public con As New ADODB.Connection
Public com As New ADODB.Command
Public rst As New ADODB.Recordset

Private Sub Form_Load()

Set con = New ADODB.Connection 'Con esto inicializamos las variables
Set com = New ADODB.Command
Set rst = New ADODB.Recordset

cadena = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source="
con.Open cadena & App.Path & "/usuario.accdb"
Set com.ActiveConnection = db 'Esta linia faltaba. Une el command al connection

com.commandText = "SELECT * FROM personas where Nombre like '" & ComboNombre & '"

set rs = com.Execute

txtApellido = rs("apellido")
txtEdad = rs("edad")
txtTel = rs("tel")

End Sub


Mira a ver si asi te va. En caso de que no avisa y te digo como abro yo las bases de datos que es algo diferente a como lo haces tu. Pero creo que eso da igual.