|
SecToHMS
(XAPI2000)
Deklaration VB 6.0
Function SecToHMS (ByVal Seconds As Long, H As Long, M As Long,
S As Long) As Boolean
Deklaration VB.NET
Function SecToHMS (ByVal Seconds As Integer, ByRef H As Integer,
ByRef M As Integer, ByRef S As Integer) As Boolean
Beskrivning
Omvandlar sekunder till timmar, minuter och sekunder. Parametern
Seconds specificerar antal sekunder som ska omvandlas. Svaret
returneras via parametrarna H, M och S (timmar,
minuter och sekunder). Parametern Seconds får vara max 134 217 727.
Returvärden
Funktionen returnerar True om allt gått bra eller
False vid fel.
Se även
HMSToSec |
Exempel (VB 6.0)
Dim St As Boolean
Dim H As Long, M As Long, S As Long
St = SecToHMS(3600, H, M, S)
|
