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

2 participantes

    [Resolvido]Qual o código para criar 3 nó referente ao exemplo treeview JPaulo?

    Mylton
    Mylton
    Super Avançado
    Super Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 799
    Registrado : 23/08/2010

    [Resolvido]Qual o código para criar 3 nó referente ao exemplo treeview JPaulo? Empty [Resolvido]Qual o código para criar 3 nó referente ao exemplo treeview JPaulo?

    Mensagem  Mylton 1/3/2019, 18:37

    Boa tarde
    No exemplo disponibilizado pelo Mestre JPaulo, referente a treeview, a codificação utilizada para 2 nós é:

    Private Sub Form_Load()
       'Crie os nós para o controle TreeView
       With MyTreeView.Nodes
    'Nó Pai
           .Add , , "QAPARENT", "Anamnese", "img1"
    'Nó filho
           .Add "QAPARENT", tvwChild, , "Queixa Principal/Histórias", "img2"
         '  .Add "QAPARENT", tvwChild, "VIEWBUG", "View Bugs", "img3"
    'Nó Pai
           .Add , , "DEVPARENT", "Avaliação Ortopédica", "img4"
           'Nó filho
           .Add "DEVPARENT", tvwChild, , "Esqueleto Axial", "img1"
           .Add "DEVPARENT", tvwChild, , "MSD", "img2"
           .Add "DEVPARENT", tvwChild, , "MSE", "img3"
           .Add "DEVPARENT", tvwChild, , "MID", "img2"
           .Add "DEVPARENT", tvwChild, , "MIE", "img3"
       End With
    End Sub





    Qual código devo utilizar para criar o 3 nó?



    Obrigado.
    Anexos
    [Resolvido]Qual o código para criar 3 nó referente ao exemplo treeview JPaulo? Attachmentarchive.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (51 Kb) Baixado 30 vez(es)
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8002
    Registrado : 05/11/2009

    [Resolvido]Qual o código para criar 3 nó referente ao exemplo treeview JPaulo? Empty Re: [Resolvido]Qual o código para criar 3 nó referente ao exemplo treeview JPaulo?

    Mensagem  Alexandre Neves 2/3/2019, 19:11

    Boa tarde,
    Será isto que quer?
    Código:
    Private Sub Form_Load()
        'Crie os nós para o controle TreeView
        With MyTreeView.Nodes
    'Nó Pai
            .Add , , "QAPARENT", "Anamnese", "img1"
    'Nó filho
            .Add "QAPARENT", tvwChild, , "Queixa Principal/Histórias", "img2"
    'Nó Pai
            .Add , , "DEVPARENT", "Avaliação Ortopédica", "img4"
            .Add "DEVPARENT", tvwChild, "Esqueleto Axial", "Esqueleto Axial", "img1"
                .Add "Esqueleto Axial", tvwChild, "MSD", "MSD", "img2"
                    .Add "MSD", tvwChild, , "Ombro D", "img1"
                    .Add "MSD", tvwChild, , "Braço D", "img2"
                    .Add "MSD", tvwChild, , "Cotovelo D", "img3"
                    .Add "MSD", tvwChild, , "Antebraço D", "img2"
                    .Add "MSD", tvwChild, , "Mão/Punho D", "img3"
                .Add "Esqueleto Axial", tvwChild, "MSE", "MSE", "img3"
                    .Add "MSE", tvwChild, , "Ombro E", "img1"
                    .Add "MSE", tvwChild, , "Braço E", "img2"
                    .Add "MSE", tvwChild, , "Cotovelo E", "img3"
                    .Add "MSE", tvwChild, , "Antebraço E", "img2"
                    .Add "MSE", tvwChild, , "Mão/Punho E", "img3"
                .Add "Esqueleto Axial", tvwChild, "MID", "MID", "img2"
                    .Add "MID", tvwChild, , "Coxa D", "img1"
                    .Add "MID", tvwChild, , "Joelho D", "img2"
                    .Add "MID", tvwChild, , "Cotovelo D", "img3"
                    .Add "MID", tvwChild, , "Tornozelo D", "img2"
                    .Add "MID", tvwChild, , "Pé D", "img3"
                .Add "Esqueleto Axial", tvwChild, "MIE", "MIE", "img3"
                    .Add "MIE", tvwChild, , "Coxa E", "img1"
                    .Add "MIE", tvwChild, , "Joelho E", "img2"
                    .Add "MIE", tvwChild, , "Cotovelo E", "img3"
                    .Add "MIE", tvwChild, , "Tornozelo E", "img2"
                    .Add "MIE", tvwChild, , "Pé E", "img3"
        End With
    End Sub


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    Mylton
    Mylton
    Super Avançado
    Super Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 799
    Registrado : 23/08/2010

    [Resolvido]Qual o código para criar 3 nó referente ao exemplo treeview JPaulo? Empty Re: [Resolvido]Qual o código para criar 3 nó referente ao exemplo treeview JPaulo?

    Mensagem  Mylton 2/3/2019, 21:16

    Perfeito.
    Muito obrigado.
    Abs.

      Data/hora atual: 1/8/2021, 12:47