Visual Basic - ayuda sobre el calendar

buenas,quisiera que me ayudaran con respecto al control calendar
de visual 6.0, ya que tengo que hacer un programa que planifique los dias de trabajo de unos
'tecnicos', y para ello necesito excluir los dias sabados y domingos (porque en este caso los 'tecnicos' no trabajan fines de semana),por ello mi pregunta es
¿Con que metodo (funcion), se puede saber que dia (a referirme a dia me
refiero, si es lunes, martes,miercoles, etc,etc ) clicleo el usuario, ?, gracias de antemano...

Private Sub Calendar1_Click()
Dim DiaSemana As String
DiaSemana = Format(Calendar1.Value, "dddd")
If DiaSemana = "sábado" Or DiaSemana = "domingo" Then
MsgBox "los " & DiaSemana & "s no trabajan los técnicos"
Else
MsgBox DiaSemana
End If
End Sub

muchisimas gracias amigo, por tomarte unos minutos de tu tiempo para responder a mi interrogante, ya con esto puedo continuar sin porblemas con mi proyecto, una vez muchisimas gracias...