lire une *.dll

salut
comment je peux lire une *.dll construite avec le Compaq Visual Fortran par vb.net
merci d'avance

voici un exemple :
1)écrire une dll avec compaq visual fortran, pour cela (Projects : Fortran Dynamic Link Library ; Files : Fortran Free Format Source File)

Code:

---

1 2 3 4 5 6 7 8 9 10 11

SUBROUTINE SUB_MATRIX_A(a,b,c)     IMPLICIT NONE   INTEGER a,b,c   a=b+c   END SUBROUTINE

---

Après cliquer "Compile" et "Build" le CVF fournis dans le classeur "Debug" les fichiers :

(a) ProjSolutionA.dll ;

(b) ProjSolutionA.exp ;

(c) ProjSolutionA.lib ;

(d) DF60.PDB ;

(e) FileSolutionA.obj ;

(f) ProjSolutionA.pdb.

Emmené la *.dll qui s'appel ProjSolutionA.dll dans le dossier où ce trouve ton .exe généralement (\bin)

2)code en vb.net

Code:

---

1 2 3 4 5 6 7 8 9 10

Friend Class Form1 Inherits System.Windows.Forms.Form Private Sub Command1_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Command1.Click Dim b, a, cf As Integer b = Val(Text1.Text) cf = Val(Text2.Text) Call SUB_MATRIX_A(a, b, cf) Text3.Text = a End Sub

---

3)Creer un module avec vb.net "module1" et mettre ça

Code:

---

1 2 3 4 5

Module Module1   Declare Sub SUB_MATRIX_A Lib "ProjSolutionA.dll" (ByRef a As Integer, ByRef b As Integer, ByRef c As Integer) End Module

---

et c'est tout

un grand merci a M.LFEMEDM