Πώς να καλέσετε μια συνάρτηση VB.NET Από Fortran DLL

. The Net πλαίσιο εισήγαγε μια παραδειγματική στροφή στον προγραμματισμό ηλεκτρονικών υπολογιστών μακριά από τη χρήση τρέχουσα βιβλιοθήκες δυναμικής σύνδεσης , DLL , με τη χρήση τύπου ασφαλή διαχειριζόμενο κώδικα . Η αλλαγή αυτή , με την πρώτη ματιά , προϋποθέτει ότι όλα . NET πόρων εφαρμογής να κωδικοποιηθεί εκ νέου ως ένα . NET DLL . Ωστόσο , σε μια προσπάθεια να παρέχει συμβατότητα με παλαιότερες εκδόσεις , η Microsoft εισήγαγε μια μέθοδο για να καλέσετε βιβλιοθήκες γραμμένες σε γλώσσες εκτός της NET framework . . Η μέθοδος είναι γνωστή ως Πλατφόρμα Invoke , συχνά συντομεύεται σε P /Invoke . Οδηγίες
Η 1

Προσθέστε ένα " Εισαγωγή" δήλωση στην ενότητα κεφαλίδα του κώδικα του προγράμματος καλώντας τις υπηρεσίες διαλειτουργικότητας . Για παράδειγμα :

Εισαγωγή System.Runtime.InteropServices 2

Προσθέστε ένα DLL χαρακτηριστικό στο σχετικό τμήμα κώδικα . Παράδειγμα κώδικα :

εικόνων 3

Δημιουργήστε μια λειτουργία πρωτότυπο που θα χρησιμοποιηθεί για να καλέσετε τη λειτουργία εντός του DLL . Αυτό εξυπηρετεί ως ένα πρότυπο έτσι ώστε ο μεταγλωττιστής γνωρίζει την υπογραφή της συνάρτησης που ονομάζεται. Αυτό το πρωτότυπο περιέχει το όνομα μιας συνάρτησης που χρησιμοποιείται για την αναφορά της λειτουργίας DLL εντός της NET εφαρμογή . Και τύπους μεταβλητών . Για παράδειγμα :

προσθήκη ( ByVal firstNumber όπως Ακέραιος , BYVAL secondNumber ως ακέραιος αριθμός)

Αυτό λέει στον compiler ότι η λειτουργία P /Invoke είναι αναφοράς θα ονομάζεται "προσθήκη" στο πλαίσιο του προγράμματος κωδικό σας , και είναι παρελθόν δύο ακέραιες μεταβλητές που ονομάζονται " firstInteger " και " secondInteger " στα πλαίσια του NET κώδικα . . Η λειτουργία μπορεί πλέον να ονομάζεται σύμφωνα με οποιαδήποτε άλλη λειτουργία .
Η
εικόνων