FAZER CALCULO DENTRO DO FLEXGRID

PAULOHSV 03/03/2005 16:12:18
#70998
RAFA-MARTIN sinceramente funciona idependente se o i for igual a 1 ou a 2 o que muda é somente a linha onde ele vai começar a ler.
Se ele somava e jogava na variavel é porque o fim do arquivo não estava sendo verificado.
USUARIO.EXCLUIDOS 03/03/2005 16:17:06
#70999
mais como eu faço para que de certo e desapareçam os erros?

me ajude

PAULOHSV 04/03/2005 09:28:15
#71067
Procure colocar o codigo para somar dentro de um Botão separado.
USUARIO.EXCLUIDOS 04/03/2005 10:15:59
#71075
paulo eu já consegui.

o código é:
Dim i As Integer
Dim Aux As Double
'aux = 0
For i = 1 To vFlexGrid.Rows - 1
vFlexGrid.Row = i
vFlexGrid.Col = 0 'coluna que vc quer somar
Aux = Aux + Val(vFlexGrid.Text)
Label2.Caption = Aux 'local onde vc quer exibir a soma no seu caso o seu mskedit
Next
vFlexGrid.Rows = vFlexGrid.Rows + 1
vFlexGrid.TextMatrix(vFlexGrid.Rows - 1, 0) = Aux

faltava as duas últimas linhas

valeu
Página 2 de 2 [14 registro(s)]
Tópico encerrado , respostas não são mais permitidas