Visual Basic - Rutina de calculo

Por favor , necesitaria que alguien me pase alguna rutina para calcular el dia de la semana, o sea, saber mediante una determinada rutina, si es lunes, martes, miercoles.......... domingo,
desde ya muchsimas gracias por la ayuda.Un abrazo

Visual Basic dispone de una función para eso, Weekday, te pongo el ejemplo que viene en la ayuda:

Dim MiFecha, MiDíaSemana
MiFecha = #12 febrero 1969# ' Asigna una fecha.
MiDíaSemana = Weekday(MiFecha) ' MiDíaSemana contiene 4 ya que
' MiFecha es un miércoles.