Hvordan lage en Dynamic Link Library for Access

Å vite hvordan du oppretter en Dynamic Link Library (DLL) for Microsoft Office Access kan gjøre koden gjenbrukes. Microsoft Visual C # er et programmeringsspråk som du kan bruke til å utføre denne oppgaven. Access er en relasjonsdatabase management system som du også kan bruke til å lage databaseapplikasjoner og automatisere oppgaver ved hjelp av Visual Basic for Applications (VBA). I noen få trinn kan du lage en DLL og bruke den i en Access-database ved hjelp av VBA.

Bruksanvisning

1 Åpne Microsoft Visual C # Express og velg "New Project ..." fra ruten til venstre. Dobbeltklikk på "Visual C #" under "Installerte maler" og dobbeltklikk på "Class Library". Trykk "Ctrl" og "A", og trykk deretter på "Slett" for å fjerne alle eksisterende kode.

2 Kopier og lim inn koden nedenfor til å lage en DLL:

bruker System;

bruker System.Collections.Generic;

bruker System.Linq;

bruker System.Text;

navne ClassLibrary1

{

public class Class1

{

public int Legg til ()

{

tilbake 13 + 14;

}

}

}

3 Klikk på "Project" -menyen og velg "ClassLibrary1 Properties". Klikk "Søknad", velg deretter "Assembly Information ...." Kryss av i boksen ved siden av "Make montering COM-Synlig." Klikk på "OK".

4 Klikk "Build", deretter av i boksen ved siden av "Registrer for COM interoperabilitet." Velg "File" -menyen, klikk "Lagre alt." Klikk på "Build" -menyen, velg deretter "Build ClassLibrary1."

5 Gå til C # prosjektet Slipp mappe, og du bør se følgende tre filer:

ClassLibrary1.tlb

ClassLibrary1.dll

ClassLibrary1.pdb

Kopiere disse filene til "C: \ WINDOWS \ system32."

6 Start Microsoft Office Access. Velg "Blank Database," klikk "Opprett". Klikk "Databaseverktøy", velg deretter "Visual Basic".

7 Klikk på "Verktøy" -menyen, velg deretter "Referanser". Klikk på "Browse" -knappen, deretter til "C: \ WINDOWS \ system32" og velg "ClassLibrary1.tlb." Klikk "Open". Merk av i boksen ved siden av "ClassLibrary1." Klikk på "OK".

8 Skriv inn følgende for å opprette en ny prosedyre:

Private Sub addNumbers ()

Call testMyDLL

End Sub

9 Kopier og lim inn følgende funksjon til modulen for å kalle den nye DLL:

Public Function testMyDLL ()

Dim dllResult As Long

Dim objAdd Som ClassLibrary1.Class1

Sett objAdd = Ny ClassLibrary1.Class1

dllResult = objAdd.Add

MsgBox dllResult

End Function

10 Trykk "F5" for å kjøre koden din og vise DLL resultat.