TRATAMENTO DE DATA E HORA.
Galera boa tarde. Preciso de uma
Parece ser algo simples, acredito que alguem possa ajudar.
Tenho um determinado produto que gasta 76 horas e 75 minutos para ser produzido.
Ou seja, suponhamos, o processo inicial hoje dia, 26/09/2010 as 12:13 e vai terminar no dia ? Hora ?
Gostaria de converter esses valores em data, hora, minuto e segundo.
Alguém tem uma idéia ?
Abraços.
Parece ser algo simples, acredito que alguem possa ajudar.
Tenho um determinado produto que gasta 76 horas e 75 minutos para ser produzido.
Ou seja, suponhamos, o processo inicial hoje dia, 26/09/2010 as 12:13 e vai terminar no dia ? Hora ?
Gostaria de converter esses valores em data, hora, minuto e segundo.
Alguém tem uma idéia ?
Abraços.
Olha só achei estranho os 75 minutos, pois o certo seria 77 horas e 15 minutos
mas isso nãp vem ao caso, tudo é matemática simples
veja bem, para facilitar vamos converter este tempo todo em miinutos
ou seja, multiplique as 76 horas por 60 e some aos 75 minutos
mas isso nãp vem ao caso, tudo é matemática simples
veja bem, para facilitar vamos converter este tempo todo em miinutos
ou seja, multiplique as 76 horas por 60 e some aos 75 minutos
Private Sub Command1_Click()
Dim H As Integer, M As Integer, T As Integer
Dim ProcessInicial As Date
Dim ProcessoFinal As Date
H = 76
M = 75
T = (H * 60) + M
ProcessoInicial = [Ô]26/09/2010 12:13[Ô]
ProcessoFinal = DateAdd([Ô]n[Ô], T, ProcessoInicial)
MsgBox [Ô]O processo terminará em: [Ô] & Format(ProcessoFinal, [Ô]dd/mm/yyyy hh:nn[Ô])
End Sub
Obrigado Marcelo
Valeu pela sua ajuda.
Valeu pela sua ajuda.
Tópico encerrado , respostas não são mais permitidas