Check data nascita se minorenne

di luca90 il
5 risposte
Utente Attivo
Iscritto da
ott, 2012
Messaggi
109
Come faccio a sapere se il cliente Nato=12/01/2016 è un minorenne, ovvero ha meno di 18 anni, in base alla data corrente?

5 Risposte

  • Avatar di sspintux
    Utente Attivo
    Iscritto da
    dic, 2012
    Messaggi
    500
    Proverei ad aggiungere 18 anni alla data di nascita per vedere cosa viene fuori
  • Utente Attivo
    Iscritto da
    nov, 2021
    Messaggi
    206
    Con un semplice

    Anni = Int(DateDiff("d", DatadiNascita, Now) / 365)

    Ciao
  • Super Famoso
    Iscritto da
    nov, 2011
    Messaggi
    21917

    luca90 ha scritto:

    Come faccio a sapere se il cliente Nato=12/01/2016 è un minorenne, ovvero ha meno di 18 anni, in base alla data corrente?
    È una cosa così semplice che mi sembra impossibile non riuscire neanche a provarci...
  • Utente Attivo
    Iscritto da
    nov, 2021
    Messaggi
    84

    pierovb ha scritto:

    Con un semplice

    Anni = Int(DateDiff("d", DatadiNascita, Now) / 365)

    Ciao
    Ehm, forse la divisione andrebbe fatta per 365,25 ed anche in quel caso credo potrebbero esistere casi in cui il calcolo non e' esatto se Now e' nell'intorno del giorno del compleanno.
  • Utente Attivo
    Iscritto da
    nov, 2021
    Messaggi
    206
    @HatFiel
    Hai perfettamente ragione il codice funzionante che tiene conto del mesegiorno è questo. 
    
Anni = DateDiff("yyyy", DataNascita, Now) - IIf(Format(DataNascita, "mmdd") > Format(Now, "mmdd"), 1, 0)
Devi accedere o registrarti per scrivere nel forum
5 risposte