none
Somar Colunas de um data set no VB.NET RRS feed

  • Pergunta

  • Alguem pode me Ajudar?

    Como eu faço para somar colunas de um datagrid !!!!

    Meu data set esta como DS a conexao e com access, o nome da tabela e Socio, e da coluna e Valor, Eu quero  que some a coluna Valor do datagrid,,,,

     

    sexta-feira, 30 de junho de 2006 00:42

Respostas

  • Boas Ricardo,

     

    Eu faço assim :

     

    Dim SomaColuna As Integer

    Private Sub ObtemSomaColunas()

    Try

    'Se o valor for nulo...

    If Me.seuDataSet.Tables(0).Compute("SUM(nomeColuna)", "") Is DBNull.Value Then

    SomaColuna = "0"

    Else

    'Utilizo o compute para somar os valores da coluna...

    SomaColuna = Me.seuDataSet.Tables(0).Compute("SUM(nomeColuna)", "")

    End If

    Catch ex As Exception

    End Try

    End Sub

     

    Depois passo o valor da soma da coluna para um label, ou textbox, o que entender :

     

    Me.Label1.Text = SomaColuna

     

     

    Espero ter ajudado

    Jorge Costa

    quinta-feira, 13 de março de 2008 20:50

Todas as Respostas

  • Sub TOTAL1()
        Dim VALOR1 As Integer
        VALOR1 = 0
        For GG = 1 To GRID8.Rows - 1
            VALOR1 = VALOR1 + GRID8.TextMatrix(GG, 2)
        Next GG
        Label3 = Format(VALOR1, "currency")
    End Sub

     

    quinta-feira, 13 de março de 2008 16:51
  • Ola Ricardo

     

    Nao entendir sua pergunta voce estar querendo somar dois valores de um dataGrid ou dois valores que estao dentro de um dataSet.

     

    quinta-feira, 13 de março de 2008 18:04
  • Boas Ricardo,

     

    Eu faço assim :

     

    Dim SomaColuna As Integer

    Private Sub ObtemSomaColunas()

    Try

    'Se o valor for nulo...

    If Me.seuDataSet.Tables(0).Compute("SUM(nomeColuna)", "") Is DBNull.Value Then

    SomaColuna = "0"

    Else

    'Utilizo o compute para somar os valores da coluna...

    SomaColuna = Me.seuDataSet.Tables(0).Compute("SUM(nomeColuna)", "")

    End If

    Catch ex As Exception

    End Try

    End Sub

     

    Depois passo o valor da soma da coluna para um label, ou textbox, o que entender :

     

    Me.Label1.Text = SomaColuna

     

     

    Espero ter ajudado

    Jorge Costa

    quinta-feira, 13 de março de 2008 20:50
  • Olá pessoal,

    por favor, Jorge, se puder me ajudar, estou numa onça danada.

    Preciso fazer a rotina acima, só que somando os valores direto da tabela. Tipo quandos pedidos um cliente fez, somando os valores e nao calculando os registros.


    Grato.
    quinta-feira, 31 de dezembro de 2009 11:48
  • jacob boa tarde, se vc precisa somar direto da tabela, vc pode fazer esse calculo na própria query antes de carregar o dataset.
    Se a minha ajuda lhe for útil não esqueça de classificar. Att. Leonardo Marcelino
    quinta-feira, 31 de dezembro de 2009 14:40
  • Bom dia jacobsamuel, se você deseja somar  os valores direto da tabela pode fazer como o nosso amigo Leonardo Marcelino disse diretamente da tabela .
    Vou dar um exemplo simples com base no que você postou :

    "quandos pedidos um cliente fez, somando os valores "

    suponhamos que você tem uma tabela chamada : "TAB_PEDIDO" com as seguintes colunas ID_CLIENTE, ID_PEDIDO, VALOR_PEDIDO
    para somar todos os pedidos desse cliente basta efetuar a seguinte query.

    SELECT SUM(VALOR_PEDIDO),ID_CLIENTE FROM TAB_PEDIDO(NOLOCK)
    GROUP BY ID_CLIENTE
    


    essa query somaria o valor de cada cliente.

    Espero ter ajudado
    sexta-feira, 1 de janeiro de 2010 12:09
  • Ae pessoal,

    consegui fazer de uma forma bem mais simples. Tem um exemplo em:

    www.jacobsamuel.no.comunidades.net 

    valeu

    domingo, 2 de maio de 2010 22:35
  • No próprio SELECT possui uma maneira de vc criar uma linha com o calculo; assim vc exibe as informações normalmente e é adicionado ao final ou ao inicio, ou após cada informação um calculo somatório.

    Testei no SQL Server.

     

    Procure por WITH ROLLUP dentro da cláusula GROUP BY


    Lucas Araújo.
    segunda-feira, 3 de maio de 2010 12:09