Ver Mensaje Individual
  #3 (permalink)  
Antiguo 11/03/2005, 10:41
Avatar de lic_dahool
lic_dahool
 
Fecha de Ingreso: noviembre-2003
Mensajes: 418
Antigüedad: 21 años, 6 meses
Puntos: 0
Una forma más sencilla de lograr lo que necesitas usando el control MonthView es:

Private Sub MonthView1_DateClick(ByVal DateClicked As Date)

Text1.Text = Format(DateClicked, "dddd, dd \de mmmm \del yyyy")

End Sub

con 3 'd' o 3 'm' obtienes la forma abreviada, con 4 el texto completo y con 2 el número.

Saludos.
__________________
La cantidad total de inteligencia del planeta permanece constante.
La población, sin embargo, sigue aumentando.

COLE


:cool: Los ordenadores no resuelven problemas ... ejecutan soluciones.
Laurent Gasser


Tienes alguna duda :pensando: ? >>> www.google.com :aplauso: <<<