SOMAR HORAS SEM PASSAR PARA OUTRO DIA
quais são os tipos de campo da sua tabela Horario
Data - Date
Codigo - Long
Nome - Text
HorasDia - Text
SaldoDia - Text
Preciso somar o campo HorasDia de um determinado intervalo e colocar o total em uma label, depois calcular o valor em Reais das horas desta label * outra label.
Codigo - Long
Nome - Text
HorasDia - Text
SaldoDia - Text
Preciso somar o campo HorasDia de um determinado intervalo e colocar o total em uma label, depois calcular o valor em Reais das horas desta label * outra label.
como fica os valores dentro deste campo horadia?
fica 7:30 ou 6:20
ou 7,5 ou 6,30
fica 7:30 ou 6:20
ou 7,5 ou 6,30
tente algo assim
Dim tempo As Date
tempo = tempo + CDate([Ô]12:03[Ô])
tempo = tempo + CDate([Ô]12:03[Ô])
tempo = tempo + CDate([Ô]11:03[Ô])
Dim Dias As Integer
Dias = DateDiff([Ô]D[Ô], 0, tempo)
Label1.Caption = Format$((Dias * 24) + Hour(tempo), [Ô]00[Ô]) + [Ô]:[Ô] + Format$(Minute(tempo), [Ô]00[Ô])
Dim tempo As Date
tempo = tempo + CDate([Ô]12:03[Ô])
tempo = tempo + CDate([Ô]12:03[Ô])
tempo = tempo + CDate([Ô]11:03[Ô])
Dim Dias As Integer
Dias = DateDiff([Ô]D[Ô], 0, tempo)
Label1.Caption = Format$((Dias * 24) + Hour(tempo), [Ô]00[Ô]) + [Ô]:[Ô] + Format$(Minute(tempo), [Ô]00[Ô])
Tópico encerrado , respostas não são mais permitidas