SOMAR DATA GRID
Ola amigos, beleza
Preciso de uma ajuda de vcs
Alguem pode me mostrar como eu faço
para Multiplicar a coluna [Ô]Quantidade[Ô] pela [Ô]Val_Vendido,
e exibir o resultado em em txtLucro ?
obs: datagrid
Preciso de uma ajuda de vcs
Alguem pode me mostrar como eu faço
para Multiplicar a coluna [Ô]Quantidade[Ô] pela [Ô]Val_Vendido,
e exibir o resultado em em txtLucro ?
obs: datagrid
DATAGRID ?
Utilize o MSFLEXGRID que você terá melhores recursos. Neste caso você deverá compor na SQL.
Utilize o MSFLEXGRID que você terá melhores recursos. Neste caso você deverá compor na SQL.
alguem sabe fazer isso com DATAGRID ?
Cara, se tu não tiver acesso à string SQL, tu pode fazer assim:
Dim TotalGasto!
Dim TotalLucro!
[ô]Ado.Recordset.MoveFirst
Do While Not Ado.Recordset.EOF [ô]...........Loop para somar o campo Preço
TotalGasto = TotalGasto + Ado.Recordset.Fields([Ô]preco[Ô])
TotalLucro = TotalLucro + (Ado.Recordset.Fields([Ô]quantidade[Ô]) * Ado.Recordset.Fields([Ô]val_vendido[Ô]))
Ado.Recordset.MoveNext
Loop
txtSaldo.Text = Format(TotalGasto, [Ô]Currency[Ô])
txtLucro.Text = Format(TotalLucro, [Ô]Currency[Ô])
Abraços.
Dim TotalGasto!
Dim TotalLucro!
[ô]Ado.Recordset.MoveFirst
Do While Not Ado.Recordset.EOF [ô]...........Loop para somar o campo Preço
TotalGasto = TotalGasto + Ado.Recordset.Fields([Ô]preco[Ô])
TotalLucro = TotalLucro + (Ado.Recordset.Fields([Ô]quantidade[Ô]) * Ado.Recordset.Fields([Ô]val_vendido[Ô]))
Ado.Recordset.MoveNext
Loop
txtSaldo.Text = Format(TotalGasto, [Ô]Currency[Ô])
txtLucro.Text = Format(TotalLucro, [Ô]Currency[Ô])
Abraços.
Tópico encerrado , respostas não são mais permitidas