Converter Data Longa Pra Data Curta?

[vilmarbr]

Converter data longa pra data curta?

Dim sDateString As String, sTimeString As String

Dim dDate As Date, dTime As Date

sDateString = "terça-feira, 4 de setembro de 2007"

'ou

'sDateString = "February 12, 1969"

'>> Ambos dão pau de Type Mismatch

dDate = CVDate(sDateString)

dDate = CVDate(sDateString)

dDate = Format$(sDateString, "dd/mm/yy hh:nn:ss")

Converter hora longa dá certo:

sTimeString = "4:35:47 AM"

dTime = CDate(sTimeString)

[vilmarbr]

Solução aqui:

http://www.vbmania.com.br/vbmania/vbmforum...&varWorld=0