Δημιουργήστε μια κλήση στο αρχείο DLL . Σε αυτό το παράδειγμα , μια κλήση προς ένα αρχείο DLL που διαχειρίζεται τους σκληρούς δίσκους στο μηχάνημα χρησιμοποιείται . Ο παρακάτω κώδικας δημιουργεί μια κλήση στο αρχείο : Declare Sub getdiskinfo Lib "c : \\ myDLL " ( ByVal δίσκο As String , όγκος ByVal Όπως String , free_space Όπως Long ) 2
Δημιουργία μεταβλητών για να στείλετε σε η λειτουργία και η μεταβλητή που περιέχει την τιμή επιστροφής . Ο ακόλουθος κώδικας χρησιμοποιείται για να δηλώσει μεταβλητές στη Visual Basic : Dim drive Όπως όγκο StringDim Όπως StringDim δωρεάν Όπως LongDim returnValue As Integer
εικόνων 3
Καλέστε τη λειτουργία και επιστρέφει μια τιμή . Ο ακόλουθος κώδικας δείχνει πώς μπορείτε να χρησιμοποιήσετε μια συνάρτηση DLL σε Visual Basic : returnValue = getdiskinfo ( δίσκο , τον όγκο , δωρεάν)
Η 4
Προβολή αποτέλεσμα την επαλήθευση των αποτελεσμάτων σας λειτουργία . Το πλαίσιο μηνύματος που χρησιμοποιείται για τη δοκιμή τιμών σε Visual Basic . Ο παρακάτω κώδικας εμφανίζει την τιμή επιστροφής από το " getdiskinfo " κλήση συνάρτησης : MsgBox returnValue
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα