[Resolvido]Hora: DifData

dteixa 12/3/2013, 23:23

dteixa: Avançado; Respeito às regras :

Sexo :
Localização :
Mensagens : 281
Registrado : 15/01/2012

Mensagem nº1

[Resolvido]Hora: DifData

Mensagem dteixa 12/3/2013, 23:23

Boas
tenho uma consulta em que uma das colunas transforma o valor Hora (H T) em minutos assim:

Hora: (DifData("n";0;Nz([h t]);0))

Funciona bem ate as 23:59, o problema é quando ultrapassa as 24:00h,
Há solução para isso?
obrigado

Bred 13/3/2013, 11:18

Bred

Bred: Intermediário; Respeito às regras :

Sexo :
Localização :
Mensagens : 115
Registrado : 15/09/2010

Mensagem nº2

Re: [Resolvido]Hora: DifData

Mensagem Bred 13/3/2013, 11:18

dteixa tente ver se server pra sua situação:

Código:: =[Resultado em Horas] * 24 ou esse metodo você pode aplicar em um Formulario [TXT_MINUTO] = Hour([TXT_HORA]) * 60 [TXT_MINUTO] = [TXT_MINUTO] + Minute([TXT_HORA])

.................................................................................
"O topo da sabedoria é alcançar a humildade..."

dteixa 13/3/2013, 22:29

dteixa

dteixa: Avançado; Respeito às regras :

Sexo :
Localização :
Mensagens : 281
Registrado : 15/01/2012

Mensagem nº3

Re: [Resolvido]Hora: DifData

Mensagem dteixa 13/3/2013, 22:29

Obrigado,
a solução para a consulta não funciona

**Avelino Sampaio** 15/3/2013, 10:36

Avelino Sampaio

Avelino Sampaio: Developer; Respeito às regras :

Sexo :
Localização :
Mensagens : 3900
Registrado : 04/04/2010

Mensagem nº4

Re: [Resolvido]Hora: DifData

Mensagem Avelino Sampaio 15/3/2013, 10:36

Crie uma função para pegar seu campo [h t] e tranformar em minutos. Algo assim:

Public function fncMinutos(ht as string)
dim m
m = split(ht,":")
fncMinutos = m(0) * 60 + m(1)
end function

Na consulta, coloque:

Hora: fncMinutos(nz([h t];"00:00"))

Veja um pouco mais neste meu artigo abaixo:

http://www.usandoaccess.com.br/tutoriais/tuto49.asp?id=1#inicio

Sucesso!

.................................................................................
Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces
Clique AQUI e analise o custo beneficio do material oferecido.