Hermetica
21 de Diciembre del 2002

Hola a todos, alguien sabra el codido nesesario para mostrar en una caja de texto la fecha de la siquiente forma: 20Dic02 (sin espacios , sin barras) y que de un mensaje de error si se introduce la fecha de otra forma.

jos?
21 de Diciembre del 2002

'Para 21Dic02:
Text1.Text = Format(Now, "DDMMMYY")

'Para 21Di2002:
Text1.Text = Format(Now, "DDMMMYYYY")

Si le pones mas M, dice el mes completo.

salu2.