Hola a todos, tengo 2 problemitas.
El primer proble para realizar un rango entre horas
Tengo 2 Variables que me traen 2 Horarios, y un DTPicker que cuando inserto la hora, tiene que consultar a los valores
Ej
Código:
Private Sub DTPicker2_LostFocus()
If DTPicker2 < diurno1.Text Or DTPicker2 > diurno2.Text Then
HN.Visible = True
Else
HN.Visible = False
End If
End Sub
El DTPicker como los datos que recibo, estan expresados en 24Hs
Desde 00:00 hasta 23:59
Segundo Problema
No me esta tomando la comparacion de una fecha
Código:
If Format$(rs!fecha_nacimiento, "dd/mm/yyyy") = "01/01/1900" Then
cnn.Execute "UPDATE Pacientes set Fecha_Nacimiento = '" & vbNullString & _
"' where id_paciente = " & rs!id_paciente & ""
End If
Aca no se porque no me hace esta funcion
Alguna idea
Muchas Gracias