by DamageCase (3 Submissions)
Category: Windows System Services
Compatability: Visual Basic 4.0 (32-bit)
Difficulty: Unknown Difficulty
Originally Published: Tue 19th October 1999
Date Added: Mon 8th February 2021
Rating:
(1 Votes)
Return the hour, minutes, or seconds in the current time.
Dim TimeVal As Byte
If returnType = "Minute" Then
TimeVal = Minute(CStr(Time))
ElseIf returnType = "Hour" Then
TimeVal = Hour(CStr(Time))
ElseIf returnType = "Second" Then
TimeVal = Second(CStr(Time))
End If
GetTimeType = TimeVal
End Function