Visual Basic - Dia domingo

Hola a todos
Hay alguna rutina para establecer si un dia determinado es Domingo ?
Desde ya muchas gracias

Hola, yo sugeriria lo siguiente:

Dim dia As String

dia = Format(Now, "dddd") ' te da el dia de la semana.


If dia="Domingo" then

msg("Hoy es domingo")
' o lo que tengas que hacer....

end if

Ese código está bien con algunos matices:

La configuración regional de la máquina tiene que ser español para que el formato devuelva "domingo", en americano p.e. devolvería "sunday".

El valor devuelto es un string en minúsculas (La comparación If dia="Domingo" no funcionaría, pero sí If dia="domingo").

También lo puedes hacer con la función DatePart, que devuelve un entero con el día de la semana (sea cual sea la configuración de la máquina):

Dim dia As Integer
dia = DatePart("w", Now)

If dia = 1 Then
.. es domingo (para los americanos el primer día de la semana es el domingo)

Tienes toda la razon!