• Home
 · 
• String Manipulation
 · 
• Function to check format time to match with hh:mm:ss format.

Function to check format time to match with hh:mm:ss format.

Function to check format time to match with hh:mm:ss format.

Rate Function to check format time to match with hh:mm:ss format.

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

  Dim Ret As Boolean
  Ret = False
  If (Mid(ChTime,3,1)=":") And (Mid(ChTime,6,1) = ":") Then
     Ret = True
     For JJ = 1 To 8
       If InStr("0123456789:",Mid(ChTime,JJ,1)) = 0 Then
         Ret = False
         Exit For
       End If
     Next JJ
  End If
  IsValidTime = Ret
End Function