ayuda..para validar si una fecha dada cae domingo

isela
19 de Diciembre del 2003
Si alguien puede informarme aplique vbSunday, pero no funciono...

kinoscar
19 de Diciembre del 2003
tendrias que usar un dayweek para obtener eso, por defecto la semana parte dia domingo asi que debes evaluar que te devuelva 0 sino me equivoco

Juan
19 de Diciembre del 2003
Puedes saberlo con la función WeekDay. Ejemplo:

Private Sub Form_Load()
Dim fecha As Date
fecha = CDate(InputBox("Introduce un fecha"))
If Weekday(fecha) = vbSunday Then
MsgBox CStr(fecha) & " es domingo"
End If
End Sub