Deseo Buscar en una Tabla con SQL con la funcion select y when y me aparezca la informacion en un list box y de entrada de nombre por medio de un text box.En la tabla tengo dos campos trabajador y numero personal .


Este es mi problema.-


Solamente quiero queal dar un nombre de trabajador por medio de un text box me aparezca elnumero personal en el list box.Pero en el programa que tengo me aparecen en el list box los numeros personales de todos los trabajadores¿Como podria hacer para q solo me apareciera el del trabajador que estoy dando?


Este es el codigo actual





Private Sub cmdbusca1_Click()


SQL = "SELECT trabajador * From Cambiose.rsRegistros Where cambiose.rsregistros.trabajador = txttrabajador.text"


Set CambiosE.rsRegistro = CambiosE.rsRegistros.Open(SQL)


CambiosE.rsRegistros.MoveFirst 'nos posicionamos en el primer registro de la tabla



Do Until CambiosE.rsRegistros.EOF ''La propiedad EOF se pone TRUE cuando se a llegado al final de la tabla
List1.AddItem CambiosE.rsRegistros("Numero Personal")
CambiosE.rsRegistros.MoveNext 'pasamos al siguiente registro
Loop
CambiosE.rsRegistros.Close
End Sub