MaximoAccess

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

Obrigado

Administração do MaximoAccess

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


    [Resolvido]popular um array do zero

    adriano_byte
    adriano_byte
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 115
    Registrado : 12/12/2013

    [Resolvido]popular um array do zero Empty [Resolvido]popular um array do zero

    Mensagem  adriano_byte em 15/10/2018, 14:36

    Ola a todos! ja procurei na internet e não encontrei.
    Como faço para polupar um array do zero?

    só existe exemplo de array já com as posições.

    preciso colocar uma caixa de texto e lá no retorno da caixa imediate me dizer que os nomes estão sendo inseridos ou pela msgbox mesmo.

    Sub arrayNomes()

    Dim NOME(1 To 7) As String

    For i = 1 To 7
    NOME(i) = NOME(i) + ", " + txtNome
    Debug.Print NOME(i)
    Next i
    End Sub

    este código está com o array em branco,quando eu digito o nome para inserir ele preenche todas as posições.

    quando eu digitar um nome deve ocupar apenas uma posição. quando eu digitar outro, deve ter o nome anterior e o atual que digitei, não posso em hipótese alguma usar tabela para isso.


    Última edição por adriano_byte em 16/10/2018, 21:09, editado 1 vez(es)
    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1069
    Registrado : 22/11/2016

    [Resolvido]popular um array do zero Empty Re: [Resolvido]popular um array do zero

    Mensagem  IvanJr. em 15/10/2018, 17:04

    Veja se o arquivo em anexo ajuda em como fazer. Desenvolvido e access 2010 - 32 bits
    Anexos
    [Resolvido]popular um array do zero AttachmentDatabase4.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (20 Kb) Baixado 9 vez(es)
    thiagomcosta
    thiagomcosta
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 367
    Registrado : 23/01/2017

    [Resolvido]popular um array do zero Empty Re: [Resolvido]popular um array do zero

    Mensagem  thiagomcosta em 15/10/2018, 17:17

    Código:
    Dim Nome As Variant

    Nome = Array()

    'Cada vez que rodar o código abaixo o VBA inclui um novo elemento no final da Array e depois joga o valor de NovoNome
    ReDim Preserve Nome(UBound(Nome) + 1)
    Nome(UBound(Nome)) = NovoNome
    adriano_byte
    adriano_byte
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 115
    Registrado : 12/12/2013

    [Resolvido]popular um array do zero Empty IvanJr, muito obrigado era isso mesmo.

    Mensagem  adriano_byte em 16/10/2018, 21:08

    tks.

    Conteúdo patrocinado

    [Resolvido]popular um array do zero Empty Re: [Resolvido]popular um array do zero

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/12/2019, 22:26