The TimeValue function converts an argument into the variant of subtype Date.

The Time argument must be a string in valid date format or you will get an error message.

Code:
<% mystring = "2:23:17 PM" %>
<% =TimeValue(mystring) %>

Output:
2:23:17 PM

Code:
<% =TimeValue("14:23") %>