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]ListBox - Apresentar vários valores e o somatório total baseado em uma consulta

    Compartilhe

    suel
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 52
    Registrado : 06/05/2013

    ListBox - Apresentar vários valores e o somatório total baseado em uma consulta

    Mensagem  suel em Seg 27 Maio 2013, 21:42

    Boa Tarde,

    Tenho um listbox no qual quero apresentar os valores armazenados bem cmo o valor total. Esse listbox será apresentado de acordo com um parâmetro passado em um textbox. Como faço isso?

    Grato
    avatar
    good guy
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1119
    Registrado : 05/02/2010

    ListBox - Apresentar vários valores e o somatório total baseado em uma consulta

    Mensagem  good guy em Seg 27 Maio 2013, 22:27

    Veja esta dica abaixo e tente adaptar ao que você deseja:

    Ao clicar na ListBox (lstProdutos):

    Private Sub lstProdutos_Click()
    ‘TotItens e Total são os nomes das caixas de texto abaixo da ListBox
    Me.TotItens = Me.lstProdutos.ListCount – 1 ‘O método ListCount conta os registros menos 1 que é o registro de índice 0. Me.Total = SomarTotal ‘SomarTotal é a função que realiza o cálculo e nos retorna um valor.
    End Sub

    ‘Exemplo de Função N.º 1
    Private Function SomarTotal()
    On Error Resume Next
    Dim x As Long
    Dim soma As Long
    soma = 0

    ‘Looping For .... Next
    For x = 1 To Me.lstProdutos.ListCount - 1
    soma = soma + Me.lstProdutos.Column(3, x) ‘3ª coluna percorrendo do índice 0 até o último índice menos 1 pega os valores da coluna Quantidade
    Next
    SomarTotal = soma

    End Function


    suel
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 52
    Registrado : 06/05/2013

    Re: [Resolvido]ListBox - Apresentar vários valores e o somatório total baseado em uma consulta

    Mensagem  suel em Seg 27 Maio 2013, 22:35

    Vou adaptar e testar o código e retorno assim q concluir.

    Valeu pela ajuda

    suel
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 52
    Registrado : 06/05/2013

    Re: [Resolvido]ListBox - Apresentar vários valores e o somatório total baseado em uma consulta

    Mensagem  suel em Ter 27 Ago 2013, 22:30

    Deu certo!

    Grato

      Data/hora atual: Seg 23 Abr 2018, 03:04