none
SOMAR COLUNA dataGrid vb.net RRS feed

  • Pergunta

  • <!-- /* Style Definitions */ p.MsoNormal, li.MsoNormal, div.MsoNormal {mso-style-parent:""; margin:0cm; margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:12.0pt; font-family:"Times New Roman"; mso-fareast-font-family:"Times New Roman";} @page Section1 {size:612.0pt 792.0pt; margin:70.85pt 3.0cm 70.85pt 3.0cm; mso-header-margin:36.0pt; mso-footer-margin:36.0pt; mso-paper-source:0;} div.Section1 {page:Section1;} -->

    Se alguém puder me ajudar ai com meu problema, já to meio carrera de tanto procurar na web e nada até agora, é sobre somar uma coluna do datagrid.

     

    Tenho um DataGrid que contém uma coluna com valores, se alguém puder mandar o código que de como somar os valores desta coluna no datagrid, que a soma sempre   vai sendo atualizada, por cada vez que for excluído um linha, ou acrescentado outra.

     

    Se alguém me ajudar ficarei muito grato.

    terça-feira, 2 de março de 2010 23:21

Respostas

  • Ok pessoal já consegui a solução, veja que coisa engraçada eu vinha a procurar essa solução a mais de uma semana, foi só postar a pergunta aqui no forum dai achei a solução.

    Ai vai o código para que se alguém tenha o mesmo problema que eu possa ser resolvido.

        Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
            Dim valor As Decimal

            For Each col As DataGridViewRow In DataGridView1.Rows
                valor = valor + col.Cells("ValorTotal").Value
            Next
            TextBox7.Text = valor
        End Sub
    Espero que esse simples código ajude muitos, porque pra mim foi um avanso...

    Que coisa uma semana esquentando a cabeça só por causa de uma linha de código, noites e noites sem dormir. rsrsrs
    É por isso que estou tentando aprender a programar, só por causa dos desafios.

    Essa resposta achei aqui no forum mesmo, e do os créditos para o nosso amigo Bv.net
    quarta-feira, 3 de março de 2010 00:21

Todas as Respostas

  • Ok pessoal já consegui a solução, veja que coisa engraçada eu vinha a procurar essa solução a mais de uma semana, foi só postar a pergunta aqui no forum dai achei a solução.

    Ai vai o código para que se alguém tenha o mesmo problema que eu possa ser resolvido.

        Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
            Dim valor As Decimal

            For Each col As DataGridViewRow In DataGridView1.Rows
                valor = valor + col.Cells("ValorTotal").Value
            Next
            TextBox7.Text = valor
        End Sub
    Espero que esse simples código ajude muitos, porque pra mim foi um avanso...

    Que coisa uma semana esquentando a cabeça só por causa de uma linha de código, noites e noites sem dormir. rsrsrs
    É por isso que estou tentando aprender a programar, só por causa dos desafios.

    Essa resposta achei aqui no forum mesmo, e do os créditos para o nosso amigo Bv.net
    quarta-feira, 3 de março de 2010 00:21
  • A A Bernadi,

    Cara tu me ajuda a bessa mlk..tb estava tentando uma parada de coisa que nao rolava,

    mais pow com um codigo "simples" desse. PROBLEMA RESOLVIDO..

    vlew

    sábado, 15 de maio de 2010 05:47
  • Olá amigo, poderia refazer a pergunta...
    sábado, 15 de maio de 2010 14:42
  • Cara, quanto a soma da coluna deu certo..

    estou tentando subtrair do valor total na medida em que eu for retirando rows do grid,

    COMO FAÇO? ja tentei modificar o valor + col.Cells("ValorTotal").Value POR valor - col.Cells("ValorTotal").Value

    E NAO DEU CERTO..

    Agradeço desde já!

    sábado, 15 de maio de 2010 14:49
  • OK

    Coloque o código no evento CellFormatting do grid ou num timer dai toda vez que você excluir ou adicionar um registro vai atualizando.

     

    rem xxxxxxxxxxxxxxx

                lblSOMA.Text =   lblSOMA.Text.Replace("-$", "")
                 lblSOMA.Text = 0


                Dim rowSomaGrid As Int32 = DataGridView1.Rows.GetFirstRow( _
                                               DataGridViewElementStates.Selected)


                Dim SomaTotal As Decimal

                For Each col As DataGridViewRow In DataGridView1.Rows
                    SomaTotal = SomaTotal + col.Cells("ColValor").Value
                Next
                llblSOMA.Text = SomaTotal
                lblSOMA.Text = (Format(lblSOMA.Text * 1, "-$#,###.00"))

                'lblSOMA.Text = (Format(lblSOMA.Text * 1, "+$#,###.00"))

    rem xxxxxxxxxxxxxxx

    'Nota: "ColValor" é o nome da coluna do grid que você quer somar

                REM Colorir linhas do dtg
                For i As Integer = 0 To DataGridView1.RowCount - 1
                    If i Mod 2 = 0 Then
                        DataGridView1.Rows(i).DefaultCellStyle.BackColor = Color.White
                    Else
                        DataGridView1.Rows(i).DefaultCellStyle.BackColor = Color.PaleGreen
                    End If
                Next

    Qualquer coisa é só perguntar, até...

    Espero ter ajudado !!!

    sábado, 15 de maio de 2010 16:40