Microsoft Access er database management programvare som er inkludert i Microsoft Office-pakken. Access bruker en form for Visual Basic programmeringsspråk for å utnytte visse funksjoner, inkludert dato og klokkeslett. Verdien for tid og dato er som en brøkdel av 24 timer . Formatering av dato for tidsperioder som eksisterer i mer enn 24 timer krever at du bruker en brukerdefinert funksjon som kompenserer for denne begrensningen . Instruksjoner
en

Start Microsoft Access-programmet . Klikk på "File "-menyen , og velg " Open".
2

Finn dokumentet du ønsker å åpne . Klikk på den en gang , og klikk "Åpne "-knappen .
3

Finn databasen vinduet , og klikk på " Moduler" -menyen . Velg " New". Skriv inn frasen "Options Explicit " i " Erklæringer " delen hvis det ikke allerede er det
4

skriv eller kopier og lim inn følgende " medgått tid " prosedyre i " Erklæringer "-vinduet : .

' -------------------------------------------- ----------------------

' Denne funksjonen beregner tidsintervallet mellom to verdier og deretter

' formater resultatet . på fire forskjellige måter

'

' funksjonen aksepterer intervall argumenter for eksempel følgende : en

'

' # 5/12/95 6 : 12:00 # - # 5/11/95 22:00:00 #

'

'

'

' [ End Time] - [Start Time]

' -------------------------------------- ----------------------------

Funksjon ElapsedTime (Intervall )

Dim x

x = Int ( CSng ( Intervall * 24 * 3600 ) ) & " Seconds "

Debug.Print x

x = Int ( CSng ( Intervall * 24 * 60 ) ) og " :" & Format (Intervall , " ss" ) _

& " minutter : sekunder "

Debug.Print x

x = Int ( CSng ( Intervall * 24 ) ) & " :" & Format (Intervall , " nn : ss" ) _

& " Timer : minutter : sekunder "

Debug.Print x

x = int ( CSng (Intervall ) ) & " dager " & Format (Intervall , " hh ") _

& " Timer " & Format (Intervall , " nn " ) & " Minutes " & _
< p> Format (Intervall , " ss" ) & " Seconds "

Debug.Print x

End Function
5

Type følge " medgått tid "-funksjonen ringe til "Direkte "-vinduet og trykk "Enter "-tasten : en

? ElapsedTime (# 6/1/1999 20:23:00 # - # 6/1/1999 08:12:12 #)

Endre datoene til de datoene du ønsker å beregne

6

Klikk på " File" -menyen og skriv inn et navn på modulen din , for eksempel " Elapsed_Time . " Velg " Lagre".
7

Klikk på " Debug "-menyen , og velg " Kompiler . " Lagre filen , og klikk " Tilbake til database . "