Kako numerički podatak pretvoriti u izveštaju ili na formi u vreme. Da objasnim, ulazni podatak je broj 123, treba mi na izveštaju da to izgleda kao 00h 2min 3s. Pokušavao sam svašta i nisam uspeo. Da li postoji neka procedura ili nešto slično. Molim za pomoć, ko zna , molim da odgovori. Hvala svima!
To je obi�an broj, naveo sam ga kao primer. Taj broj ozna�ava broj sekundi.
Kao naprimer broj 92. To je 92 sekunde I treba ga prevesti u vreme : 1 minut
32 sekunde.
Izvinjavam se ako je pitanje bilo neprecizno formulisano.
Nadam se da je sada jasno.
Pozdrav I hvala!!
U Excel-u broj sekundi (npr. 123) podelis sa 86400 i dobijeni decimalni broj formatiras kao h:mm:ss i dobijes 0:02:03. Mozda ovako ili slicno moze i u Access-u.
REŠEN PROBLEM!!!
Hvala korisniku SLOJ.1973
Ova procedura koju je on uradio, upravo rešava problem koji nisam znao da rešim. Uz minornu modifikaciju, ova procedura radi i na formi i na izveštaju.
Ako još nekom zatreba pretvaranje broja u vreme, evo rešenja:
A = Me.trajanje
If A < 60 Then Me.Text2 = A
If A >= 60 Then
If A >= 3600 Then
H = Int(A / 3600)
M1 = A Mod 3600
If M1 > 60 Then
M = Int(M1 / 60)
S = M1 - M * 60
Else
M = 0
If M1 = 60 Then
M = 1
S = 0
Else
S = M1
End If
End If
Else
H = 0
M = Int(A / 60)
S = A Mod 60
End If
if H = 0 Then Me.Text2 = M & " m" & ":" & S & " s": Exit Sub
Me.Text2 = H & " h" & " " & M & " min" & " " & S & " sec"
End if
Naziv polja TRAJANJE je moje polje, a vi ga zamenita sa nazivom vašeg ulaznog polja.
Još jednom, hvala momku iz Požarevca, i svima koji su se uključili u ovo temu.
POZDRAV!!!
Za ono "momak" imas pice.Pozdrav i drago mi je da sam pomogao.
Postoji mala greška u kodu,jer ako je broj manji od 60 ne ispisuje tekst u obliku h:mm:ss već samo broj.Zato u mom kodu i stoji
Code: If A < 60 Then
S = A
H = 0
M = 0
Me.Text2 = H & "h" & " " & M & "min" & " " & S & "sec"
.
[Ovu poruku je menjao SLOJ.1973 dana 08.09.2012. u 11:15 GMT+1]
Registrovani: 8 ( scoolptor, valjan, bojanum, caprrri, kentaur66, Marko_L, Rikelme81, peromalosutra )
Numerički podatak u vreme