Converter data em numero

[Renato Knupp]

Senhores estou com um problema, preciso saber a diferença entre duas datas o problema é que o resultado obtido possui varias casas decimais ( em alguns casos com ate 9 numeros após a virgula) e acho que o sistema não está aceitando devido meu tipo de variavel, tentei todas as vaiáveis numericas possiveis e não deu certo.

O Erro exibido é " Erro em tempo de execução '13'. Tipos incompatíveis!

conta_tempo1 = 20/8/2008 09:00

conta_tempo2 = 20/8/2008 13:40

tempo = (conta_tempo2 - conta_tempo1) * 24

o resultado dessa expressão é 4,66666666668607.

dúvidas:

tem algum tipo de variável que seje diferente de Integer, Long, single, double, para esse caso?

eu não posso arredondar isso pois eu tenho que considerar as horas e os minutos tambem ( ai a necessidade das casas decimais).

o que fazer?

Editado Agosto 21, 2008 por Renato Knupp

[João.Neto]

Renato, todas as datas em vb deve vir juntas com o símbolo #.

Ex.: data1 = #12/15/2008# (o padrão é mm/dd/aaaa, mas você pode digitar no padrão dd/mm/aaaa que o vb arruma sozinho).

Agora, para saber a diferença entre as datas, você pode utilizar a função DateDiff:

Sub MostraDiferencaEntreDatas()

Dim data1 As Date, data2 As Date, diferenca As Integer

data1 = #1/20/2008#

data2 = #3/20/2008#

diferenca = DateDiff("d", data1, data2)

MsgBox "A diferença em dias é: " & diferenca

End Sub

O DateDiff mostra a diferença em intervalos anuais, semanais e etc... Utilize o ajuda e você conseguirá as expressões para retornar o intervalo.

abs... B)