Preciso que o valor final da primeira linha da gidview apareça somando com a segunda linha da gridview

Question

a primeira linha recebe um valor do textbox que faz o calculo final, e na segunda linha pega o resultado do calculo final e faz outra soma dando o resultado final.

preciso de ajuda.

Answer 1

Boa tarde Alessandro,

Poderia nos enviar mais detalhes do seu problema e o seu código, para que possamos analisar com mais precisão onde está localizado o erro?

Obrigado,

Abraço!

---

Eduardo Romero

Esse conteudo e fornecido sem garantias de qualquer tipo, seja expressa ou implicita.

MSDN Community Support

Por favor, lembre-se de Marcar como Resposta as respostas que resolveram o seu problema. Essa e uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais facil para os outros visitantes encontrarem a resolucao mais tarde.

Answer 2

Boa tarde Alessandro,

Poderia nos enviar mais detalhes do seu problema e o seu código, para que possamos analisar com mais precisão onde está localizado o erro?

Obrigado,

Abraço!

---

Eduardo Romero

Esse conteudo e fornecido sem garantias de qualquer tipo, seja expressa ou implicita.

MSDN Community Support

Por favor, lembre-se de Marcar como Resposta as respostas que resolveram o seu problema. Essa e uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais facil para os outros visitantes encontrarem a resolucao mais tarde.

Protected Sub GridView2_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GridView2.RowDataBound
        If e.Row.RowType = DataControlRowType.DataRow Then

            Dim recebe As Label = e.Row.FindControl("Label4")
            Dim recebeFinal As Label = e.Row.FindControl("Label5")
            Dim cotacaoIndice As Label = e.Row.FindControl("Label2")
            Dim ValorCorrecao As Label = e.Row.FindControl("Label6")

            
            Dim Valor As Decimal = TextBox1.Text

            Dim a As Decimal
            a = cotacaoIndice.Text



            Dim b As Decimal

            b = ((Valor / 100) * a) + Valor


            'recebe.Text = Valor
            Dim correcao As Decimal

            correcao = FormatCurrency(((Valor / 100) * a))
            ValorCorrecao.Text = correcao

            recebeFinal.Text = FormatCurrency(b)

         
            If GridView2.Rows.Count = 0 Then

                recebe.Text = Valor

            ElseIf GridView2.Rows.Count > 0 Then


            End If

           






        End If

Eduardo, tenho que pegar o resultado final da primeira linha colocar na segunda linha em valor inicial, e fazer o resultado final na segunda linha, conforme esta selecionada a data

Answer 3

Boa tarde,

Tudo bem?

Encontrou alguma solução para o seu problema?

Atenciosamente

---

Marcos SJ

Esse conteúdo e fornecido sem garantias de qualquer tipo, seja expressa ou implícita

MSDN Community Support

Por favor, lembre-se de Marcar como Resposta as postagens que resolveram o seu problema. Essa é uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais fácil para os outros visitantes encontrarem a resolução mais tarde.

Answer 4

sim fiz esse codigo dentro do botão

    meuModulo.teste = ""
        meuModulo.correcao = ""


        Dim dataInicio, dataFim, dataAtual As Date
        dataInicio = TextBox2.Text
        dataFim = TextBox3.Text
        dataAtual = Today


        If dataInicio > dataFim Then

            Label8.Text = "Data inicio maior que data fim"
            Label8.Visible = True
            GridView2.Visible = False

        Else
            Label8.Visible = False
            GridView2.Visible = True

        End If


        If dataFim > dataAtual Then

            Label9.Text = "Data fim maior que data atual"
            Label9.Visible = True
            GridView2.Visible = False

        Else
            Label9.Visible = False
            GridView2.Visible = True



        End If

e depois esse dentro da gridView usando o meuModulo dentro dor for, assim vai pegando e somando conforme selecione as datas.

If e.Row.RowType = DataControlRowType.DataRow Then

            Dim recebe As Label = e.Row.FindControl("Label4")
            Dim recebeFinal As Label = e.Row.FindControl("Label5")
            Dim cotacaoIndice As Label = e.Row.FindControl("Label2")
            Dim ValorCorrecao As Label = e.Row.FindControl("Label6")
            Dim valorFinal As Label = e.Row.FindControl("Label7")

            Dim Valor As Decimal = TextBox1.Text


            Dim a As Decimal
            a = cotacaoIndice.Text



            Dim b As Decimal


            b = ((Valor / 100) * a) + Valor


            'recebe.Text = Valor
            Dim correcao As Decimal
            correcao = FormatCurrency(((Valor / 100) * a))
            ValorCorrecao.Text = FormatCurrency(correcao)

            recebeFinal.Text = FormatCurrency(b)




            For i = 0 To GridView2.Rows.Count



                If i = 0 Then

                    recebe.Text = Valor
                    recebe.Text = FormatCurrency(Valor)
                End If



                If i > 0 Then
                 
                    recebe.Text = meuModulo.teste
                    recebeFinal.Text = ((meuModulo.teste / 100) * a) + recebe.Text
                    recebeFinal.Text = FormatCurrency(recebeFinal.Text, 2)

                    ValorCorrecao.Text = meuModulo.correcao

                    ValorCorrecao.Text = FormatCurrency((recebe.Text / 100) * a, 2)
                    



                    
                End If




            Next
     

            meuModulo.teste = recebeFinal.Text






        End If