• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

Ridelight

Obter apenas os últimos 4 digitos de uma textbox

9 mensagens neste tópico

Bem eu tenho uma textbox com data 24/02/2007 e quero extrair de lá para outra textbox apenas os 4 ultimos digitos, como faço isso?

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Boas

Uma das formas é com a função Right()

text2.text = right(text1.text, 4)

PS

Mas se a ideia é "sacar" apenas o ano e nem ter de passar por uma textbox, então tens outras formas de o fazer.

Cumps

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Sim é isso, agora como consigo obter a data actual para uma textbox no mesmo formato 09-03-2008 é que

Text1.text = Format(Now, "dddd dd mmmm, yyyy")

Dá-me a data por extenso !

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Experimenta assim

Text1.text = Format(Now, "dd-MM-yyyy")

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Ou então:

Text1.Text = Now.ToShortDateString()

Não sei se deste conta mas este tópico está em VB 6 e não em VB.net  :cheesygrin:

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Experimenta assim

Text1.text = Format(Now, "dd-MM-yyyy")

Esta funciona !

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Ou então podes usar um MID, visto que a data tem no máximo 10 caracteres.

Exemplo: msgbox (Mid(text1.text,6,4))

Cumps.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora