Hi,
Yes you can use a MaskEdit Control or if you want to do it in a Textbox only then you can use the MID() function.
Dim HH as String
Dim MM as String
Dim SS as String
Dim MyTime as String
If Len(Text1.text) = 6 then
HH = Mid (Trim(Text1.text), 1, 2)
MM = Mid (Trim(Text1.text), 3, 2)
SS = Mid (Trim(Text1.text), 5, 2)
MyTime = HH & ":" & MM & ":" & SS
End If
Hope this helps,
Lalit
Life Means More...;)
|