Spanish [solucionado]FECHAS

soyVB6

Active Member
Licensed User
Buenas tardes colegas HELP!
estoy tratando de convertir
esta fecha ="02/08/2017", el formato es dd/MM/yyyy
el resultado que quiero obtener es: 02/Agosto/2017
B4X:
DateTime.DateFormat="dd/MMMM/yyyy"
Dim otr,otr1 as string
otr1="02/08/2017"
Dim SomeTime As Long
SomeTime = DateTime.DateParse(otr1)
otr= DateTime.Date(SomeTime)

llevo toda la mañana jugando con este código y no me da HELP !
 

EnriqueGonzalez

Well-Known Member
Licensed User
Por como lo veo tienes que cambiarlo 2 veces: 1 para convertir de string a long y la otra de long a string

si es asi?

B4X:
DateTime.DateFormat="dd/MM/yyyy"
Dim otr,otr1 as string
otr1="02/08/2017"
Dim SomeTime As Long
SomeTime = DateTime.DateParse(otr1)
DateTime.DateFormat="dd/MMMMM/yyyy"
otr= DateTime.Date(SomeTime)
 

soyVB6

Active Member
Licensed User
Funciona perfecto para lo que necesito con DateUtils
desconocía la existencia de esta librería

GRACIAS Enrique, Saludos
 
Top