Visual Basic - Convertir fecha

Life is soft - evento anual de software empresarial
 
Vista:

Convertir fecha

Publicado por Mariano (52 intervenciones) el 19/08/2003 21:11:53
Hola, tengo que tomar un valor de fecha con el formato 19 de agosto de 2003 y el problema es que CDate espera 19 agosto 2003 . No reconoce el formato con los "de". En la configuracion regional lo tengo bien configurado (d' de 'MMMM' de 'aaaa) intente con la funcion Format usando Format(miVar, "dd/mm/yyyy") pero no funciono. Desde ya, gracias por cualquier consejo.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Convertir fecha

Publicado por JORGE (67 intervenciones) el 19/08/2003 21:53:22
Quitale el "de" con la funcion mid
Label1 = Mid(fecha, 1, 2) & Mid(fecha, 7, Len(fecha) - 14) & Mid(fecha, (Len(fecha) - 4))

Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Convertir fecha

Publicado por JORGE (67 intervenciones) el 19/08/2003 22:11:50
ESTO ES LO CORRECTO PERO QUEDA TODO JUNTO EL 31JULIO2003
Label1 = Mid(fecha, 1, 2) & Mid(fecha, 7, Len(fecha) - 14) & Mid(fecha, (Len(fecha) - 3))
CHAO
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Convertir fecha

Publicado por Juan (284 intervenciones) el 20/08/2003 17:25:50
Utiliza la funcion replace para substituir " de " por " " de esta forma:

cadenaFecha = replace(cadenaFecha, " de ", " ")

de esta forma la cadena "19 de agosto de 2003" quedará "19 agosto 2003"
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar