1 Ανοίξτε το Microsoft Visual C # Express και επιλέξτε "New Project ... " από το αριστερό παράθυρο . Κάντε διπλό κλικ στο " Visual C # " υπό τον τίτλο " Εγκατεστημένες Πρότυπα " και κάντε διπλό κλικ στο " Class Library". Πατήστε το πλήκτρο " Ctrl " και " A " και στη συνέχεια πατήστε το κουμπί " Διαγραφή" για να αφαιρέσετε όλα τα υπάρχοντα κώδικα 2
Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα για να δημιουργήσετε ένα αρχείο DLL : .
Χρησιμοποιώντας Σύστημα?
χρησιμοποιώντας System.Collections.Generic ?
χρησιμοποιώντας System.Linq ?
χρησιμοποιώντας System.Text ?
namespace ClassLibrary1
{
δημόσια τάξη Κλάσης1
{
public int Add ( ) {
επιστρέψει 13 + 14 ?
} }
}
εικόνων 3
Κάντε κλικ στο μενού "Έργο" και επιλέξτε " ClassLibrary1 Ιδιότητες". Κάντε κλικ στο " Εφαρμογή " και στη συνέχεια επιλέξτε " Συνέλευση πληροφορίες .... " Επιλέξτε το πλαίσιο δίπλα στο " Make συγκρότημα COM -ορατού . " Κάντε κλικ στο " OK".
Η
4 Κάντε κλικ στο κουμπί "Build ", έπειτα επιλέξτε το πλαίσιο δίπλα στο " Εγγραφή για διαλειτουργικότητα COM . " Επιλέξτε από το μενού "Αρχείο" , στη συνέχεια, κάντε κλικ στο κουμπί " Save All ". Κάντε κλικ στο μενού " Build" , στη συνέχεια, επιλέξτε " . Build ClassLibrary1 "
5
Πηγαίνετε στο φάκελο έκδοσης του έργου C # σας και θα πρέπει να δείτε τα ακόλουθα τρία αρχεία :
ClassLibrary1.tlb
ClassLibrary1.dll
ClassLibrary1.pdb
Αντιγράψτε τα αρχεία στο "C : . \\ WINDOWS \\ system32 "
Η 6
Ξεκινήστε τη Microsoft Office Access . Επιλέξτε " Κενή βάση δεδομένων , " και στη συνέχεια κάντε κλικ στο κουμπί " Δημιουργία ". Κάντε κλικ στο " Εργαλεία βάσης δεδομένων , " και στη συνέχεια επιλέξτε " Visual Basic ".
Η
7 Κάντε κλικ στο μενού "Εργαλεία" , στη συνέχεια, επιλέξτε "Αναφορές ". Κάντε κλικ στο κουμπί "Αναζήτηση" , στη συνέχεια, περιηγηθείτε στο "C : \\ WINDOWS \\ system32 " και επιλέξτε " ClassLibrary1.tlb . " Κάντε κλικ στο κουμπί "Άνοιγμα ". Επιλέξτε το πλαίσιο δίπλα στο " ClassLibrary1 . " Κάντε κλικ στο " OK".
8
Πληκτρολογήστε το παρακάτω, για να δημιουργήσετε μια νέα διαδικασία :
Private addNumbers Sub ( )
Call testMyDLL
End υπο
Η 9
Αντιγράψτε και επικολλήστε την ακόλουθη συνάρτηση με την ενότητα για να καλέσετε το νέο σας DLL :
testMyDLL Public Function ( )
Dim dllResult Όπως Long
Dim objAdd Όπως ClassLibrary1.Class1
Set objAdd = Νέα ClassLibrary1.Class1
dllResult = objAdd.Add
MsgBox dllResult
Function End
10
Πατήστε το πλήκτρο " F5 " για να εκτελέσει κώδικα σας και να εμφανίσει το DLL αποτέλεσμα .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα