UNIR OS DADOS DE 2 GRIDS E MONTAR O 3 TERCEIRO

ASHKATCHUP 14/01/2010 13:52:00
#331885
Pra evitar erros que ocorrem quando a coluna está vazia, é melhor você colocar [Ô]0[Ô].
E depois, é só somar.


            If Rs!OPC = 1 Then
                If Not IsNull(Rs!var_RESULTADO) Then
                    .TextMatrix(ilinha, 2) = CDate(Rs!var_RESULTADO)
                Else
                    .TextMatrix(ilinha, 2) = CDate([Ô]00:00:00[Ô])
                End If
            Else
                If Not IsNull(Rs!var_RESULTADO) Then
                    .TextMatrix(ilinha, 3) = CDate(Rs!var_RESULTADO)
                Else
                    .TextMatrix(ilinha, 3) = CDate([Ô]00:00:00[Ô])
                End If
            End If
            [ô]
            If .TextMatrix(ilinha, 2) <> [Ô][Ô] And .TextMatrix(ilinha, 3) <> [Ô][Ô] Then
                .TextMatrix(ilinha, 4) = CDate(.TextMatrix(ilinha, 2)) + CDate(.TextMatrix(ilinha, 3))
            End If
WEBIER 14/01/2010 15:29:44
#331903
nossa ficou perfeito!

Valew cara!
Página 3 de 3 [22 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar