Calcul de l'age

Soyez le premier à donner votre avis sur cette source.

Snippet vu 26 400 fois - Téléchargée 28 fois

Contenu du snippet

fonction toute simple en vb.net pour savoir l'âge d'une personne.

Source / Exemple :


Protected Sub calcul_age()

        Dim datetimenow = DateTime.Now
        Dim datedenaissance = CDate(TbDn.Text)
        Dim age As Integer

        age = CInt(Now.Year - datedenaissance.Year)
        If (datedenaissance.Month > Now.Month) Then

            age = age - 1
        End If
        If ((datedenaissance.Month = Now.Month) And (datedenaissance.Day > Now.Day)) Then

            age = age - 1
        End If

        Me.Label3.Text = " Age : " & age & " ans"

    End Sub

A voir également

Ajouter un commentaire Commentaires
Messages postés
1
Date d'inscription
mardi 8 juin 2010
Statut
Membre
Dernière intervention
8 juin 2010

age à partir de la date de naissance :

If DateSerial(Year(Date), Month(DateNaissance), Day(DateNaissance)) > Date Then
MyAge = Year(Date) - Year(DateNaissance) - 1
Else
MyAge = Year(Date) - Year(DateNaissance)
End if
Messages postés
4
Date d'inscription
jeudi 4 février 2010
Statut
Membre
Dernière intervention
4 février 2010

OK merci beaucoup
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
69
préciser :
(Nombre de jours entre naissance et date du jour )

???

euh, ben, c'est ...

le nombre de jour entre :
- date de naissance
- date courante
Messages postés
4
Date d'inscription
jeudi 4 février 2010
Statut
Membre
Dernière intervention
4 février 2010

Vien tu juste de faire mon programme en plus simplifié? WoW
Messages postés
4
Date d'inscription
jeudi 4 février 2010
Statut
Membre
Dernière intervention
4 février 2010

Pourrai tu svp me préciser cette phrase pour moi

(Nombre de jours entre naissance et date du jour )

Je crois que cela ma m'aide beacoup
Afficher les 30 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.