fechas festivas

[RonAraya]

lo de los fiines de semana es sencillo
la función weekday(fecha) te devuelve un numero que te indica que dia de la semana es aunque no debes preocupate por eso porque puedes utilizar las constantes de vb6 para eso

por ejemplo un codigo que te diga si HOY es fin de semana sería algo como así

If Weekday(Date) = vbSaturday or Weekday(Date) = vbSunday Then
MsgBox "Hoy estamos en fin de semana"
End If

para los días festivos te recomiendo que el sistema los carge de algun tipo de archivo

porque en el propio año pueden cambiarlos de fecha
y de esta forma si canbian solo cambias el archivo y no el codigo del programa

liego haces un modulo que carge esos dias, que se yo a una matriz por ejemplo y evalua ese día contra esa lista para ver si es festivo o no

salu2