opa pessoal to fazaendo no meu listview um sistema pra mostrar quantos dias se passaram de uma data de pagamento , por exempo uma data de pagamento todo dia 10  , se for dia 15, o campo no listivew mostra o numero 5, como tipo 5 dias de atraso, mas a consultaq eu estou fazendo nao esta dando certo pelo seguinte nao esta reconhecendo o mes , se a pessoa esta atrasada mais de 30 dias , nao mostra tipo dias de atraso ,"31 dias de atraso" , esta dando numeros negativos no caso se for  todo dia 10 de pagamento , e se por exemplo hoje é dia 3 , quando vira o mes esta mostrando -7 , esta fazendo uma contagem regressiva , alguem sabe como resolver isso?

 

faço assim , uma varivel

 Dim DiasVencidos As String
  

DiaVenc = rs!data_Aluguel
        Resultado = iDia - DiaVenc

 

no item do listview ponho o resultado da conta

 Item.SubItems(8) = Resultado

Olá Korn, experimente usar o comando CDate para converter os dados em tipo Date e usa a função DateDiff para calcular a diferença entre as datas.

 

Tentei...

veio valew pela dica mas como fazer ?

Korn, o CBitt te deu o caminho das pedras. Voce usa a funcao datediff para calcular a diferenca de datas, basta mostrar no view. Qual seria a duvida.

 

Se for a funcao datediff de uma olhada no velho macoratti que te mostra muita coisa. Calcula a diferenca em dias, meses e etc

 

 

Se for a diferenca de atraso seria algo assim. Ajuda

txt_dias_atraso =  DateDiff("d", Data_vencimento, Now)

muito bom o conteudo valew mesmo , mas a conta q eu fiz retornou o valor 0