Pourquoi cette DLL Fortran n'est-elle pas lue par mon application VB.NET?

Question

J'essaie de lier une bibliothèque de liens dynamiques Fortran (DLL) avec une application VB.NET. La sous-routine contenue dans la DLL est censée modifier une valeur c fournie du côté VB, mais elle ne le fait pas: elle conserve c telle quelle.

Voici le code Fortran:

SUBROUTINE prueba_int(m,n,p) 
!DEC$ ATTRIBUTES DLLEXPORT, DECORATE, ALIAS : "prueba_int" :: prueba_int 
!DEC$ ATTRIBUTES REFERENCE :: m,n 
IMPLICIT NONE 
INTEGER, INTENT(IN) :: m,n 
INTEGER,INTENT(OUT) :: p 

p=m*n 

END SUBROUTINE 

Et voici la section VB.NET:

Public Class Form1 
Public Declare Sub prueba_int Lib "Dll2.dll path" (ByRef m As Integer, ByRef n As Integer, ByRef p As Integer) 
Private Sub btn1_Click(sender As Object, e As EventArgs) Handles btn1.Click 
    ofd.Filter = "(*txt)|*.txt" 
    If (ofd.ShowDialog() = DialogResult.OK) Then 
     txtArray.Text = ofd.FileName 
    End If 
End Sub 

Private Sub btnCalc_Click(sender As Object, e As EventArgs) Handles btnCalc.Click 
    Dim a, b, c As Integer 
    a = CInt(txt1.Text) 
    b = CInt(txt2.Text) 
    c = 1 
    Call prueba_int(a, b, c) 
    MsgBox(c) 'Only to check c's value 
End Sub 
End Class 

Je l'ai déjà essayé d'utiliser LONG au lieu de INTEGER, mais le problème est resté. Quelqu'un peut-il me donner une idée de ce problème?

EDIT: Les codes VB.NET et FORTRAN ont tous deux été programmés à l'aide de Visual Studio 2015 avec le compilateur Intel Fortran (Parallel XE 2017). La DLL a été créée à l'aide de la convention d'appel STDCALL(/iface:stdcall).

Answer 1

J'ai déjà trouvé la solution. La seule chose que je ne changeait la ligne d'exportation avec celui-ci:

!DEC$ ATTRIBUTES DLLEXPORT, STDCALL, REFERENCE, ALIAS : "prueba_int" :: prueba_int

!DEC$ ATTRIBUTES REFERENCE :: m,n

Maintenant, ça marche! Ce fil était utile, si quelqu'un d'autre a le même problème: https://software.intel.com/en-us/forums/intel-visual-fortran-compiler-for-windows/topic/276310