FAZER CALCULO DENTRO DO FLEXGRID
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.
Se ele somava e jogava na variavel é porque o fim do arquivo não estava sendo verificado.
mais como eu faço para que de certo e desapareçam os erros?
me ajude
me ajude
Procure colocar o codigo para somar dentro de um Botão separado.
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
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
Tópico encerrado , respostas não são mais permitidas