Visual Basic - Un problema con base de datos

Hola buenas noches.

Les escribo para compartir con ustedes un problema que tengo.
He estado tratando de relacionar un programa que hice con una base de datos pero no puedo relacionar la opción "buscar" me dice que los datos que busco son corresponden a nombre de campo, eso no lo entiendo porque se supone que tengo que darle el bombre de campo yue busque el valor del campo y no el nombre. Esto lo estoy haciendo desde menú y también me gustaría hacerlo por medio de botones.

POSIBLEMENTE LA INSTRUCCION DE BUSKEDA NO ESTA BIEN ESTABLECIDA
NO SEP PERO YO LO AGO ASIP
conex
RST_EMPLEADO.Source = "SELECT * FROM TB_CON WHERE CVL_EMP=" & TXT_CVL_EMP.Text & ";"
RST_EMPLEADO.ActiveConnection = ADOCONN
RST_EMPLEADO.Open

If Not RST_EMPLEADO.EOF Then
TXT_NOM.Text = RST_EMPLEADO.Fields("nombre")
TXT_ASIG.Text = RST_EMPLEADO.Fields("AGIN")
TXT_DOMI.Text = RST_EMPLEADO.Fields("domicilio")
TXT_EDAD.Text = RST_EMPLEADO.Fields("edad")
TXT_EDOCIVIL.Text = RST_EMPLEADO.Fields("edi_civil")
TXT_NACIO.Text = RST_EMPLEADO.Fields("nacionalidad")
TXT_POR.Text = RST_EMPLEADO.Fields("porsen")
TXT_PUESTO.Text = RST_EMPLEADO.Fields("puesto")
TXT_SALARIO.Text = RST_EMPLEADO.Fields("salario")
TXT_VAC.Text = RST_EMPLEADO.Fields("vacaciones")
Combo1.Text = RST_EMPLEADO.Fields("pago")
Combo2.Text = RST_EMPLEADO.Fields("comi")
Combo3.Text = RST_EMPLEADO.Fields("CATEGORIA")
Combo4.Text = RST_EMPLEADO.Fields("TIP")
TXT_GT.Text = RST_EMPLEADO.Fields("FECHH")
desconectar
MsgBox ("El registto ya Existe"), vbInformation, "REGISTROS"
CMD_ACEPTAR.Enabled = False
Command2.Enabled = True
Command3.Enabled = True
Command4.Enabled = True
Command5.Enabled = True
Else

desconectar