Iniciar sesiónCerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta
LWP » Foros » Access » cambio de cuadro de texto a cuadro combinado

Access - cambio de cuadro de texto a cuadro combinado

Volver
Nuevo Tema
<<>>
 
Vista:

cambio de cuadro de texto a cuadro combinado

Publicado por JulioJose (1 intervención) el 04/10/2004 19:15:23
Hola amigos, quisiera saber, como puedo cambiar un cuadro de texto a cuadro combinado, pero haciendo por codigo,
gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Alejandro

cambio de cuadro de texto a cuadro combinado

Publicado por Alejandro (4142 intervenciones) el 12/05/2023 00:07:45
Para cambiar un cuadro de texto a un cuadro combinado en Access utilizando código, debes seguir estos pasos:

1. Crea un nuevo cuadro combinado en el formulario en la posición deseada.
2. Asigna un origen de datos al cuadro combinado, ya sea mediante una consulta o una lista de valores estática.
3. Copia el valor del cuadro de texto original al nuevo cuadro combinado.
4. Oculta o elimina el cuadro de texto original.

Aquí tienes un ejemplo de código para realizar estos pasos:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Private Sub CambiarCuadroTextoACuadroCombinado()
    Dim strValor As String
 
    ' Obtén el valor del cuadro de texto original
    strValor = Me.NombreCuadroTexto.Value
 
    ' Añade un nuevo cuadro combinado en la posición deseada
    Me.Controls.Add "ComboNombre", acComboBox, , Me.NombreCuadroTexto.Left, Me.NombreCuadroTexto.Top, Me.NombreCuadroTexto.Width, Me.NombreCuadroTexto.Height
 
    ' Asigna un origen de datos al nuevo cuadro combinado (puedes usar una consulta o una lista de valores estática)
    Me.ComboNombre.RowSource = "SELECT Campo1, Campo2 FROM Tabla"
 
    ' Copia el valor del cuadro de texto original al nuevo cuadro combinado
    Me.ComboNombre.Value = strValor
 
    ' Oculta o elimina el cuadro de texto original
    Me.NombreCuadroTexto.Visible = False
    ' o bien: Me.Controls.Remove "NombreCuadroTexto"
End Sub

Asegúrate de reemplazar "NombreCuadroTexto" con el nombre real del cuadro de texto que deseas cambiar y ajusta el origen de datos del cuadro combinado según tus necesidades.

Al ejecutar este código, el cuadro de texto se reemplazará por un cuadro combinado con el mismo valor y los mismos datos que el cuadro de texto original. Puedes ajustar la posición y el tamaño del cuadro combinado según tus preferencias.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar