MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


    [Resolvido]ComboBox populada por Nomes de Controles

    Convidad
    avatar
    Convidad
    Convidado


    • Mensagem nº1

    [Resolvido]ComboBox populada por Nomes de Controles Empty [Resolvido]ComboBox populada por Nomes de Controles

    Mensagem  Convidad 5/4/2012, 14:51


    Olá!

    Preciso popular a ComboBox cboListaControles do meu formulário com o Nome de cada um dos controles do subformulário sfProdutos.

    Melhor seria se retornasse a propriedade Legenda do rótulo associado a cada controle.




    Última edição por Norberto Rost em 11/4/2012, 12:36, editado 1 vez(es)
    • Ir para o topo
    Avelino Sampaio
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3880
    Registrado : 04/04/2010
    • Mensagem nº2

    [Resolvido]ComboBox populada por Nomes de Controles Empty Re: [Resolvido]ComboBox populada por Nomes de Controles

    Mensagem  Avelino Sampaio 5/4/2012, 15:58

    Olá

    Experimente:

    Dim ctrl As control
    For Each ctrl In Forms!sfProdutos.Form.Controls
    Me.cboListaControles.AddItem ctrl.Name
    Next

    Sucesso!


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    • Ir para o topo
    Convidad
    avatar
    Convidad
    Convidado


    • Mensagem nº3

    [Resolvido]ComboBox populada por Nomes de Controles Empty Re: [Resolvido]ComboBox populada por Nomes de Controles

    Mensagem  Convidad 5/4/2012, 16:23


    Deu um branco...

    Limitei para caixas de texto,
    então ficou assim:

    Dim ctrl As control
    For Each ctrl In Forms!sfProdutos.Form.Controls
    If ctrl.ControlType = acTextBox Then
    Me.cboListaControles.AddItem ctrl.Name
    End If
    Next

    Grande Avelino, põe na conta!
    • Ir para o topo
    Conteúdo patrocinado

    Conteúdo patrocinado


    • Mensagem nº4

    [Resolvido]ComboBox populada por Nomes de Controles Empty Re: [Resolvido]ComboBox populada por Nomes de Controles

    Mensagem  Conteúdo patrocinado

    • Ir para o topo
      Data/hora atual: 28/4/2024, 10:06