Combobox ->textbox
Hola. Muy buenas. Tengo una problemita. En ena tebla tengo un campo que hace referencia a otra tabla(1, Juan; 2, Mary y etc.). Cuando saco datos en formulario en combobox todo OK - oculto primer campo-clave y me sale solo los nombres. Pero si yo quiero sacas nombres en textbox (o algo parecido a textbox) me sale números 1, 2 y etc. Razón por que no quiero que me salgan en combobox es que tiene flecha a elegir(por eso es combobox :)) Gracias.
Que tengas buena tarde
Que tengas buena tarde
1 respuesta
Respuesta de juanito01
1
Puedes establecer propiamente el campo como de búsqueda en la definición de la tabla para que posteriormente te realice esa búsqueda desde tu formulario sin necesidad de especificárselo al propio control del form. Puedes hacerlo también desde el evvento form_current del form con una sencilla rutina:
Private Sub Form_Current()
Dim base As Database
Dim rst As Recordset
Set base = CurrentDb
Set rst = base.OpenRecordset("select nombre from clientes where id='" & Me.lote & "'")
If rst.RecordCount > 0 Then
txtNombre = rst.Fields(0)
Else
txtNombre = "Vacío"
End If
End Sub
Private Sub Form_Current()
Dim base As Database
Dim rst As Recordset
Set base = CurrentDb
Set rst = base.OpenRecordset("select nombre from clientes where id='" & Me.lote & "'")
If rst.RecordCount > 0 Then
txtNombre = rst.Fields(0)
Else
txtNombre = "Vacío"
End If
End Sub
