Comparar datas no VB

[nirsu 0]

Galera,Estou fazendo uma comparação de datas no VB, mas não ta dando certo.Tipo:Dim Hoje As StringHoje = Format(Date, "dd/mm/yyyy")If rs1.Fields(3) < Hoje Then...end ifSe rs1.Fields(3) = 31/12/2006 e Hoje = 30/01/2007, deveria ser verdadeiro... mas ta dando falso. Acredito que está olhando o dia, 31 > 30, então FALSO. Acho que não está entendendo que é data.Como resolver ???

[Thales Ferrari 0]

utilize o datediff, ele retorna a diferença entre as datas e você pode ver se a diferença é positiva ou negativa e apartir dai definir se é maior ouo menor a data, etc, ele pode retornar em dias para você.nao estou com vb 6 agora mas em .net seria:dim x as integerx = DateDiff(DateInterval.Day, rs1.fields, Hoje)if x < 0 then data superior a hojeelse data inferior a hojeend ifespero q seja isso.

[nirsu 0]

Valeu, consegui fazer !!TKS