Aprire Microsoft Visual C # Express e selezionare " Nuovo progetto ... " nel riquadro di sinistra . Fare doppio clic su " Visual C # " in " Modelli installati " e fare doppio clic su " libreria di classi. " Premere il tasto " Ctrl " e "A ", quindi premere "Elimina" per rimuovere tutto il codice esistente 
 2 
 Copia e incolla il codice qui sotto per creare una DLL : . 
 
 Using System; 
 
 utilizzando System.Collections.Generic ; 
 
 utilizzando System.Linq ; 
 
 utilizzando System.Text ; 
 
 namespace ClassLibrary1 
 
 { 
 
 public class Class1 
 
 { 
 
public int Aggiungi ( ) per
 { 
 
 ritorno 13 + 14; 
 
 } } 
 
 
 
 } 
 
 3 Fare clic sul menu "Progetto" e selezionare " ClassLibrary1 Proprietà". Fare clic su " Applicazioni ", quindi selezionare " Informazioni Assembly .... " Seleziona la casella accanto a "Make assemblea visibile a COM . " Fare clic su " OK ". 
 4 
 Clicca " costruire", quindi selezionare la casella accanto a " Registra per interoperabilità COM . " Selezionare il menu "File" , poi su " Save All ". Fare clic sul menu "Build" , quindi selezionare " Costruire ClassLibrary1 . " 
 5 
 Vai alla tua cartella di uscita del progetto C # e dovreste vedere i seguenti tre file : 
 
 ClassLibrary1.tlb 
 
 ClassLibrary1.dll 
 
 ClassLibrary1.pdb 
 
 copiare questi file "C : . \\ WINDOWS \\ system32 " 
 6 
 Avviare Microsoft Office Access . Selezionare " Database vuoto ", quindi fare clic su "Crea ". Fare clic su " Strumenti di database ", quindi selezionare " Visual Basic ". 
 7 
 Fare clic sul menu "Strumenti" , quindi selezionare "Riferimenti ". Fare clic sul pulsante "Sfoglia" , quindi selezionare "C : \\ WINDOWS \\ system32 " e selezionare " ClassLibrary1.tlb . " Fare clic su " Apri ". Seleziona la casella accanto a " ClassLibrary1 . " Fare clic su "OK". 
 8 
 Digitare quanto segue per creare una nuova procedura : 
 
 addNumbers Private Sub () 
 
 Chiama testMyDLL 
 
 End sub 
 9 
 Copia e incolla il seguente funzione al modulo per chiamare la nuova DLL : 
 
Public Function testMyDLL ( ) per
 Dim dllResult Come 
 lunga 
 Dim objAdd Come ClassLibrary1.Class1 
 
 objAdd = New ClassLibrary1.Class1 
 
 dllResult = objAdd.Add 
 
 MsgBox dllResult 
 
 End Function 
 
 10 
 Premere " F5 " per eseguire il codice e visualizzare il risultato DLL . 
 
              
Programmazione © www.354353.com