I'm trying to format time in short form without using military time as the AM/PM data is being stored in a separate field. The following code doesn't work. I get a run-time error of 13 and type mismatch. DateAdd won't work since the format of the returned data is in Long Time form.
Private Sub CTime_AfterUpdate()
If Hour([CTime]) > 12 Then
CTime = Format((Hour([CTime]) - 12) + ":" + Minute([CTime]), "Short Time")
End If
End Sub