[Resolvido]Conversão Horas

Tenho um campo hora que ao preencher vai-me dar um período horário em outro campo ou seja:

00:25 ----> 00:00 a 01:00

tentei mas não funcionou

Private Sub Hora_LostFocus()
If Me.Hora > "00:00" Or Me.Hora < "01:00" Then
Me.Texto207 = "00:00 a 01:00"
End If
End Sub

Consegui resolver ficou

If Me.Hora > "00:00" And Me.Hora < "01:00" Then
Me.Texto207 = "00:00 a 01:00"
End If