VBからfortranサブルーチンを呼び出すことを独学しようとしています。そして、私は本当に単純な例で作業しようとしていますが、どういうわけかうまくいきません。Intel Visual Fortran で Visual Studio 2010 を使用しています。これが私が試しているコードです:
SUBROUTINE ARRAYTEST(arr)
!DEC$ ATTRIBUTES DLLEXPORT, ALIAS:"ARRAYTEST" :: ARRAYTEST
REAL arr(3, 7)
INTEGER i, j
DO i = 1, 3
DO j = 1, 7
arr (i, j) = 11.0 * i + j
END DO
END DO
END SUBROUTINE
正常にビルドされ、DLL ファイルが作成されます。そして、ここに私のVisual Basicコードがあります:
Public Class Form1
Private Declare Sub ARRAYTEST Lib "FortTest.DLL" Alias "ARRAYTEST" (ByVal x As Single)
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim arr(0 To 2, 0 To 6) As Single
Call ARRAYTEST(arr(0, 0))
TextBox1.Text = arr(3, 3)
End Sub
End Class
DLL ファイルをディレクトリに配置してコードを実行すると、次のエラーが発生しました。
私はグーグルで検索しましたが、これに対する解決策が見つかりませんでした. よろしくお願いします。