Code:
        If Val(Hour(Now)) = Val(txtHour.Text) Then
            If Val(Minute(Now)) = Val(txtMin.Text) Then
                 MsgBox "It's Time!"
            End If   
                 End If
It don't work