none
Presentar VISIBLE SÍ / NO campos en formulario RRS feed

  • Pregunta

  •  

    Un saludo a Tod@s
    Tengo un "pequeño" problema que no consigo resolver con las soluciones que he encontrado por Internet. Planteado

    sencillamente sería así:
    Quiero, que al cargar el formulario inicialmente, el "Cuadro de Lista NO", el "Cuadro de Texto NO", el  "Cuadro de lista SÍ"  y el "Cuadro de Texto SÍ" estén VISIBLE SÍ o VISIBLE NO según el valor "Cuadro De Lista X" o "Cuadro de Texto X".

    Inicialmente el "Cuadro de Texto X" puede venir en NULO, lo que el resto de Cuadros y Listas debieran estar en VISIBLE NO. Al seleccionar del "Cuadro de Lista X" un valor SÍ o NO,  se me debe de presentar el que corresponda.
    Muchas gracias

    sábado, 1 de septiembre de 2007 17:43

Todas las respuestas

  • Hola!

     

    creo que no planteas correcta y completamente el problema, lo que puedo decir a cuanto pides es que en el evento al cargar el formulario pongas

     

    Me.txtX=Null

    Me.lstNo.Visible=False

    M.txtNo.Visible=false

    Me.lstSi.Visible=False

    M.txtSi.Visible=false

     

    dado que no dices que ocurre cuando cambie ninguno de llos nada mas puedo aportar

    domingo, 2 de septiembre de 2007 6:00
  •  


    Antes que nada, gracias Emilio por la respuesta.
    Quise poner la pregunta tan simple que la compliqué. Mis disculpas.
    Ya lo tengo todo solucionado. Tenía un problema en una declaración que no tenía que ver nada con esto y me despistaba.
    Muestro un pequeño ejemplo de lo que quería.
    Al cargar el formulario y activar el registro, me sale lo que corresponda. Y al hacer Click sobre el elemento de la lista me actualiza el formulario mostrándome lo que necesito y ocultándome lo que no corresponda.
    ==============================================
    Private Sub Form_Current()

            ListaNoContactado.Visible = False
            ListaSíContactado.Visible = False
            ListaNoAcepEntrevista.Visible = False
            ListaAcepEntrevista.Visible = False
     ' así 14 líneas más

        If CodContactado = 0 Then
       
            ListaNoContactado.Visible = True
            ListaSíContactado.Visible = False
            ListaNoAcepEntrevista.Visible = False
            ListaAcepEntrevista.Visible = False
     ' así 14 líneas más
              
            Else

            ListaNoContactado.Visible = False
            ListaSíContactado.Visible = True
            ListaNoAcepEntrevista.Visible = False
            ListaAcepEntrevista.Visible = False
     ' así 14 líneas más

        End If
    End Sub
    ===================================================

    Más o menos (según la opción del cuadro de lista) éste es el código que he puesto en cada "click". Estoy seguro que se podría simplificar mucho, pero como de esto sé lo justo y me vale, pues me doy por satisfecho.
    Intentaré colaborar en el foro en la medida de mis conocimiento.
    Un Cordial saludo.

    domingo, 2 de septiembre de 2007 20:09