17/09/2011, 12:04
|
| | | Fecha de Ingreso: noviembre-2010 Ubicación: madrid
Mensajes: 478
Antigüedad: 14 años Puntos: 5 | |
 conocer el día de la semana
hola, alguien tiene algún código de como saber el día de la semana con el que empieza un mes?, he intentado esto pero nada
Function GetMonthDays(ByVal MonthToCheck As Date) As Integer
GetMonthDays = Day((DateAdd("dd",1,Format(MonthToCheck, "mm/yyyy")))- 1)
End Function
Private Sub Command1_Click()
MsgBox(GetMonthDays(CDate("02/23/2004")))
End Sub |