[VB.NET] Calcolo età

[OrcaAssassina]

Con questa formula calcolo l'età di una persona, ma in modo approssimato

Dim AnnoNascita As String
Dim AnnoRilevazione As String
AnnoNascita = Format(CType(Me.txtDataNascita.Text, DateTime), "yyyy")
AnnoRilevazione = Format(CType(Me.txtDataRilevazione.Text, DateTime), "yyyy")
Me.txtEta.Text = AnnoRilevazione - AnnoNascita

Cosi facendo mi mette l'età solo che non è riferito anche al mese e al giorno

Come posso fare per rendere l'età ancora più precisa?????

Ciao e grazieeeee

[cionci]

Se (il mese è minore) O (il mese è uguale E il giorno è minore) allora togli 1

[OrcaAssassina]

Originariamente inviato da cionci

Se (il mese è minore) O (il mese è uguale E il giorno è minore) allora togli 1

Anche io l'ho ragionata, cosi ma non so come prendere il mese dalla data, come faccio????'

Ciao e grazieeeee

[cionci]

Allo stesso modo in cui hai prelevato l'anno sopra

[OrcaAssassina]

Originariamente inviato da cionci

Allo stesso modo in cui hai prelevato l'anno sopra

Se faccio come prima:
AnnoRilevazione = Format(CType(Me.txtDataRilevazione.Text, DateTime), "yyyy")

Prendo sempre l'anno a me serve una volta il mese e una volta il giorno

Come faccio?????

Ciao e grazieeeee

[cionci]

Hai provato a leggere l'help riguardo alla funzione Format ?

[OrcaAssassina]

Originariamente inviato da cionci

Hai provato a leggere l'help riguardo alla funzione Format ?

Ok ci sono riuscito, adesso funziona!!!!!!!!!!