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)
