Visual Basic - Problema con ADO

Que tal, necesito ayuda para saber como modifico algunos datos a una base de datos que hice en SQL Server si coloque el siqguiente codigo:

option explicit

Private con As ADODB.Connection
Private WithEvents recb As ADODB.Recordset

private sub Form_Load()
Set con = New ADODB.Connection
Set recb = New ADODB.Recordset

con.ConnectionString = "provider=sqloledb.1;" & _
"initial catalog=Empleados;
con.Open

Set recb.ActiveConnection = con
recb.CursorType = adOpenDynamic
recb.LockType = adLockOptimistic
recb.Open "select * from Empleados", con

End Sub

Private Sub Editar_Click()

With recb

'cargar aqui los datos
!empleado = IIf(txtHospedaje = " ", "N/A", txtempleado)
!honorarios_diseño_proyecto = IIf(txtHonorariosdp = " ", "N/A", txtHonorariosdp)
!equipo_audiovisual = IIf(txtEquipoa = " ", "N/A", txtEquipoa)
!renta_salon = IIf(txtRentas = " ", "N/A", txtRentas)

.Update
MsgBox "Los Datos se Guardarón con Éxito", vbInformation, "Aviso"
SendKeys "{Home}+{End}"
End With

End Sub

El problema es que no me modifica los datos del registro que quiero solo el del primer registro que tengo en la base de datos.

¿Como hacer para que me modifique el registro que busco y no el primer registro que esta en la base de datos.?

Hola samas:
Prueba a poner esto:
en donde pones: recb.Open "select * from Empleados", con
eso esta muy bien, pero lo unico que haces es listar todos los registros que tienes en la tabla Empleados. Tendrás que buscar por el codigo de empleado o por alguna referencia, para que se posicione el puntero y te lo modifique, por ejemplo:
recb.Open "select * from Empleados where codigoEmpleado=35", con

Y es en ese momento donde ya te ha buscado el registro para ser modificado.

Pruebalo para saber si eso funciona.

Saludos
Llaverin