Important:

Quaisquer soluções e/ou desenvolvimento de aplicações pessoais, ou da empresa, que não constem neste Blog podem ser tratados como consultoria freelance.

Views

VBA Access - Convertendo o conteúdo de um TextBox em Data (Convert TextBox values to Dates)

Conversões são tão comuns que chegam a ser monótonas...

...Mas entendo que são fundamentais para quem está começando...Freqüentemente utilizo textboxes como campo para o dataentry de Datas (Date). O problemas é que apesar de formatá-los para se parecerem com uma data, continuam contendo um valor text. A função CDate() é uma boa solução para este trabalho. Escrevo uma function e mando todo o trabalho para essa função interna. Minha function captura o tipo texto (Text) e o converte para data (Date).





Function Vert2Dt(dtStr As String) As Date
                ' Converte o conteúdo do textbox formatado como data em uma data "real".
 

                Let Vert2Dt = CDate(Left$(dateString, 2) & "/" & Mid$(dateString, 3, 2) & "/" & Right$(dateString, 4))
End Function


André Luiz Bernardes
A&A - WORK, DON´T PLAY!
http://al-bernardes.sites.uol.com.br/

bernardess@gmail.com
inanyplace
bernardess@gmail.com



LinkWithinBrazilVBAAccessSpecialist

Related Posts Plugin for WordPress, Blogger...

Vitrine