Ir para conteúdo
Fórum Script Brasil
  • 0

Idade Real


·Gheysa·

Pergunta

Gente, minha dúvida é fácil....

Eu to fazendo um programinha de formulário e na hora de colocar a data de hoje, com a do nascimento, precisa aparecer a idade real do indivíduo; tipo comparar o mês e o dia pra ver se ele já fez níver esse ano ou não..

Alguém tem o código ae pra me passar !?!?

Brigadinha,

Gheysa

Link para o comentário
Compartilhar em outros sites

9 respostass a esta questão

Posts Recomendados

  • 0

Você pode utilizar as funções Day(), Month() e Year(), para saber, respectivamente, o dia, o mês e o ano de uma determinada data. Exemplo:

data = CDate("25/01/1984")
dia = Day(data)
mês = Month(data)
ano = Year(data)

Nesse caso, dia será 25, mês será 1 e ano será 1984.

Ok?

Abraços,

Graymalkin

Link para o comentário
Compartilhar em outros sites

  • 0

daí tu pode testar

if dia < day(now)  AND mes <=month(now) then
     'já fez aniversario
else
     'não fez ainda
end if

Eu estou enferrujado em VB, não lembro se é com now que tu ve a data atual, mas acho que sim, qualquer coisa, se estiver errado, alguém arruma aí, por favor smile.gif

Link para o comentário
Compartilhar em outros sites

  • 0

ahhhh legal...

mas tipo assim gente, o objetivo é saber a idade real, sei lá.. fazer uma conta ae...

não só dizer se já fez níver ou não, manja?!?

tipo foi digitada a data de nascimento,

depois a data de hoje,

daí depois em algum label, será apresentada a idade.

Exemplo:

dt de nascimento: 05/12/94

hoje: 04/12/04

idade: 9

Link para o comentário
Compartilhar em outros sites

  • 0

Exatamente, e por isso é que procuramos mostrar o "caminho das pedras", ao invés de apresentar a coisa pronta. Juntando a dica do Eddie com o que eu já tinha feito, seria algo assim:

hoje = CDate("04/12/2004")
aniv = CDate("05/12/1994")
idade = Year(hoje) - Year(aniv)
If Month(hoje) >= Month(aniv) Then
    If Day(hoje) >= Day(aniv) Then
        somar = 0
    Else
        somar = -1
    End If
Else
    somar = -1
End If
idade = idade + somar
MsgBox "Idade real: " & idade

Certo?

Abraços,

Graymalkin

Link para o comentário
Compartilhar em outros sites

  • 0

Cara, acho q funciona sim... O que ela quer saber basicamente é a diferença em anos de duas datas...

Link para o comentário
Compartilhar em outros sites

  • 0
Cara, acho q funciona sim... O que ela quer saber basicamente é a diferença em anos de duas datas...

tipo.. no exemplo q ela deu foi o seguinte..

dt de nascimento: 05/12/94

hoje: 04/12/04

idade: 9

Tipo.. usando o DateDiff, ele vai mostrar 10 Anos, sendo q ele so vai fazer 10 anos no dia seguinte..

sad.gif

so se tem algo no datediff q eu não conhece e faca o calculo certo sad.gif

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152k
    • Posts
      651,7k
×
×
  • Criar Novo...