21. november 2002 - 14:19Der er
10 kommentarer og 1 løsning
Ved død, Hvor gammel blev han så.
Jej har en skuespiller database, med felterne født, alder, død. Alder beregnes med
Indsat som modul
Public Function Alder(Dato As Date) As Integer If DateSerial(Year(Date), Day(Dato), Month(Dato)) > Date Then Alder = DateDiff("yyyy", Dato, Date) - 1 Else Alder = DateDiff("yyyy", Dato, Date) End If End Function
Eks i en ubundet tekstboks:
=IIf([Fødselsdato] Is Not Null;alder([Fødselsdato])) Hvordan beregnes det, hvor gammel han/hun blev hvis der er en dato i feltet [Død].
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Jeg vil kun have et felt til aldersberegning, det skal indeholde alder hvis der er en fødselsdato, hvis der også er en Dødsdag, skal feltet beregne forskel mellem fødselsdag og død.
If IsNull(Me.Død) Then If DateSerial(Year(Date), Day(Dato), Month(Dato)) > Date Then Alder = DateDiff("yyyy", Dato, Date) - 1 Else Alder = DateDiff("yyyy", Dato, Død) End If End If
Det må kunne lade sig gøre, men jeg har ikke afprøvet det.
Else aldersberegning med udgangspunkt i fødselsdato og Date() End If
Jeg har lavet en lille "dato indtastning" som beregner forskellen mellem startdato og slutdato/dagsdato. Resultat i år og måneder. Access 2000 =IIf(IsNull([Startdato]);"Ukendt dato";IIf(IsNull([Slutdato]);(DateDiff("m";[Startdato];Date())\12) & " år og " & (DateDiff("m";[Startdato];Date()) Mod 12) & " mdr.";(DateDiff("m";[Startdato];[Slutdato])\12) & " år og " & (DateDiff("m";[Startdato];[Slutdato]) Mod 12) & " mdr.")) Eyvind.
Hej Rosco! Det er en lille database på 144kb hvis du vil have den tilsendt til afprøvning, for den virker her hos mig. Jeg kan ikke umiddelbart se fejlen. Eyvind
eyvind: Jeg havde lavet en stavefejl,derfor fejlen #navn?, men det hjalp at se hvordan du havde gjort det. Det var lige det jeg skulle bruge. Månederne skulle jeg egentlig ikke bruge, men det ser nu godt ud. Mange tak for hjælpen.
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
