Calcular o tempo de deslocamento
Nota importante: para ter acesso aos vídeos e arquivos exemplos deste site, adquira um dos planos apresentados abaixo. Você pode comprar em até 10x no Cartão de Crédito.
Veja como comprar e saiba mais sobre o material oferecido, clicando aqui.
Usuário José:
Bom dia!
Estou desenvolvendo um aplicativo para um determinado evento, onde tenho que controlar o tempo em que cada equipe permanece em um ambiente, e o tempo de deslocamento de um ambiente para outro:
Ex: Calcular o tempo de deslocamento de um ambiente para outro.
| ambiente | dh_início | dh_fim | permanência | deslocamento |
| A | 08:00 | 08:10 | 00:10 | 00:00 |
| B | 08:25 | 08:45 | 00:20 | ? |
| C | 09:15 | 09:45 | 00:30 | ? |
| D | 10:05 | 12:00 | 01:55 | ? |
Suporte:
José,
o resultado seria esse?
| ambiente | dh_início | dh_fim | permanência | deslocamento |
| A | 08:00 | 08:10 | 00:10 | 00:00 |
| B | 08:25 | 08:45 | 00:20 | 00:15 |
| C | 09:15 | 09:45 | 00:30 | 00:30 |
| D | 10:05 | 12:00 | 01:55 | 00:20 |
Esse resultado servirá apenas para exibição?
Usuário José:
Avelino, é isso mesmo!
O deslocamento = (hora de chegada B) - (hora de saída A)
Será exibido em um formulário, só para o usuário acompanhar.
Suporte:
José,
segue o exemplo.
- Abra a consulta qryTeste e veja o resultado.
Técnica utilizada deste meu artigo.
O código utilizado na consulta foi este:
Public Function fncSomarConsulta(varInicio, varFim) As Double
Static n As Double
If IsNull(varInicio) Then
n = 0
Exit Function
End If
If n = 0 Then
fncSomarConsulta = 0
n = varFim
Exit Function
End If
fncSomarConsulta = varInicio - n
n = varFim
End Function
Usuário José:
Sensacional!
Muito obrigado!
Download
| Não há comentário |
