Lidt hjælp til Vb vil være rigtig godt !

Hent inspiration her http://www.programmershelp.co.uk/visualbasic/calcage1.txt

Eller her http://www.bitbucketheaven.com/code/age.shtml

jeg er lidt bag ud men masser af lektier..derfor søger jeg hjælp hurtigt...skal nå 2 mere stil :( pls can du ikke lave den og give mig... søger meget desperate..

'
' Calculates age in years from a given date to today's date.
'
'

Function Age(varBirthDate As Variant) As Integer

  Dim varAge As Variant
  if not isDate(varBirthDate) then Exit Function
  varAge = DateDiff("yyyy", varBirthDate, Now)
  If Date < DateSerial(Year(Now), Month(varBirthDate), _
                        Day(varBirthDate)) Then
      varAge = varAge - 1
  End If
  Age = CInt(varAge)
 
End Function



Hvordan kan jeg lave den så den ligner virkelig newbie

Jeg laver ikke lektier for andre, men kig på den igen, den tager fra en given dato til idag, du skal så bare tage fra en given dato til en anden given dato.

ahhh kom nu mate.... jeg er virkelig skod til dette...jeg har ikk hørt efter i timerne :( men kan du ik forklar mig hvad variant er og varage -1 er

Variant betyder en variabel af en hvilken som helst type, men da du bruger vbscript skal du ikke bruge As Variant. varAge er bare en variabel som der bliver trukket 1 fra.

ok fint...læg et svar ud...så giver jeg bare det lovede 200 points..

.

Og dem tog du så elegant selv