ocr: LE1 - frmSetTime -OX (General) ValidateTime Function valldatelime (Time As String, Field As Control) As B Dim strMsg As String If IsDate (Time) Then Field.Text = Format $ (Time, "h:mm AM/PM") valldatelime = True Else strMsg = "Please enter a valid time I (Hour :1 Minute AM MsgBox MsgBOXPrompt, (Buttons As' VDMSgBOXStle), [Title], HeipFie), [Contexi)) As VbMSgBOXResul