Somar dbgrid

USUÁRIO: SENHA:

SALVAR LOGIN ?


	Fórum
	Visual Basic

Responder

Voltar

Autor

Assunto: Somar dbgrid

SÃO CARLOS
SP - BRASIL

ENUNCIADA !

Postada em 20/09/2008 17:30 hs

olá eu queria quando eu abrir o form o dbgrid somar uma coluna e colocar o resultado da soma em um textbox.

grato

Ash Katchup

CAXIAS DO SUL
RS - BRASIL

Postada em 22/09/2008 10:55 hs

Este seu problema poderia ser resolvido através de um "FOR", mais ou menos assim:
____________
total = 0
    '
For i:= 1 to Grid.rows-1
total = total + Grid.textmatrix(i,coluna)
next
'
text1.text = total
____________
Qualquer duvida, da um grito ai ou manda um email.

TÓPICO EDITADO

Alexandre Patos

PATOS DE MINAS
MG - BRASIL

ENUNCIADA !

Postada em 22/09/2008 15:06 hs

coloque esse codigo no botao e teste

Private Sub Command1_Click()
    Dim dSoma As Double
    dSoma = 0
    For i = 0 To DBGrid1.VisibleRows - 1
        DBGrid1.Row = i
        dSoma = dSoma + CDbl(DBGrid1.Columns(0))
    Next i
    MsgBox "Total: " & dSoma
End Sub

Página(s): 1/1

Seu Nome:
Seu eMail:		ALTERAR PARA MODO HTML
Mensagem: [:)] = [:P] = [:(] = [;)] = HTML DESLIGADO

VOLTAR


		CyberWEB Network Ltda. © Copyright 2000-2024 - Todos os direitos reservados. Powered by HostingZone - A melhor hospedagem para seu site