Léia
|
GOIANIA GO - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 07/06/2005 20:23 hs
Ola!! No meu projeto anterior eu precisa somar uma coluna apenas de um Dbgrid para eu ter o valor do Saldo... agora preciso calcular duas colunas a Entrada e Saida.. somar a Entrada depois somar a Saida e fazer a diferença para ter o Saldo.. Dai fiz assim para as duas colunas e armazenei nas variaveis: For I = 0 To nLIN - 1 If nLOOP = nVIS Then ' qtde de loops (contador) e Registros visualizados nLOOP = 1 'a ultima linha já foi somada e agora é a 1a visivel, então End If dbgCaixa.Row = nLOOP dbgCaixa.Col = 3 'INDICAR AQUI a coluna p/ soma(1a coluna = 0, 2a = 1 ...) EnTrada = EnTrada + CCur(dbgCaixa) nLOOP = nLOOP + 1 Next Apos esse calculo, eu calculei a Resultado: REsultado = (EnTrada) - (Saida) SO q ele nao esta calculando... ja na EnTrada = EnTrada + CCur(dbgCaixa.text) emite um erro do tipo 13 ... ja descabelei e nao sei mas o q fazer..
Peço ajudinha de vcs!!!
"Quem tem o Filho de Deus tem a vida ! (I Joao5:12)"
|
|
|
|
Paulo José
não registrado
|
|
ENUNCIADA !
|
|
|
Postada em 07/06/2005 23:31 hs
Bom pq vc não faz uma consulta via sql para cada coluna, colocando o resultado em txtboxs e depois fazendo o calculo?? é muito mais facil... Paulo José
|
|
|
Léia
|
GOIANIA GO - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 08/06/2005 14:26 hs
O unico problema com essa logica é pq no campo entrada q nao esta prenchido (pq o registro esta na saida) esta vazio, dai da erro de Tipo mistach.. pq o campo tem o registro vazio... Assim: Codigo Entrada Saida 101 R$ 100,00 102 R$ 180,00 103 * R$ 200,00 * onde apresenta o erro txtSaldo : R$ 80,00
"Quem tem o Filho de Deus tem a vida ! (I Joao5:12)"
|
|
|
Léia
|
GOIANIA GO - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 08/06/2005 14:31 hs
Ah! Fiz uma condiçao.. ser o campo estiver um registro vazio nao soma pula para o proximo..
"Quem tem o Filho de Deus tem a vida ! (I Joao5:12)"
|
|
|