|
|
|
![](images/pasta_topo.gif)
|
![](images/folha.gif)
|
Dicas
|
![](images/folha_fim.gif)
|
Visual Basic (Datas/Números/Strings)
|
|
![](images/box01esqsup.gif) |
Título da Dica: Retornar a diferença entre dois horários
|
![](images/box01dirsup.gif) |
|
|
Postada em 7/7/2003 por Lúcia
Esta função retorna a diferença de horas.
Private Function RetornaHoraDif(hinicio,hfim) Dim DifHora DifHora = DateDiff ("n",hinicio,hfim) RetornaHoraDif = (DifHora / 60) End Function
Para utilizar a função basta passar os parametos da Hora Inicia e da Hora Final, exemplo:
DifHoras = + RetornaHoraDif(rstsheet("TiHoraInicialTim"),rstsheet("TiHoraFinalTim"))
|
|
|
|
![](images/hosted.gif)
|