rasape
11 de Enero del 2006

Hola a tod@s
Puede alguien decirme como pasar un numero introducido en un TextBox a un formato dd/mm/yy.
Por ejemplo:
Si introducen 221206 en el TextBox y quiero guardarlo como 22/12/06 o 22/12/2006

mvallejos
11 de Enero del 2006

Descomponiendo la propiedad Text es sus tres partes

Dim Dia as string
Dim Mes As String
Dim AƱo as String
Dim Fecha as string

Dia = Left(Text1.Text,2)
Mes = Mid(Text1.Text, 3, 2)
AƱo = "20" & Right(Text1.Text, 2)
Fecha = Dia & "/" & Mes & "/" & AƱo

Saludos

rasape
11 de Enero del 2006

Muchas gracias, has sido de gran ayuda!