ocr: 43 RSURIE IUTE - LEE1 - trmSetlime -OX GLAD (RT) Private Sub Form Load() If Recorder.StartRecording <> Empty Then txtStart.Text = Recorder.StartRecording End If If Recorder.StopRecording <> Empty Then CxtEnd.lext - Recorder.StopRecording End If txtChannel = Recorder.Channel End Sub Function valldatelime (Time As String, Field As Ca Dim strMsg As String If IsDate (Time) Then Fleld.Text = rormat $ (Time, "h:mm AM/PM") valldatelime = True Eise strMsg = "Please enter a valld time! (Hoi MsgBox strnsg, VDokonly, "Invalid Time" fleld.setrocus valldatelime = Faise End If End Function
(.png)
