主题:vb与fortran之间数组的调用 牛b人物能解决的进(加上了代码)
简单的写一下 计算没有问题,就是调用
fortran代码如下:
subroutine PROMAIN(xdjx,oilnd0,D,DL,sp,PXL,X,Y,WP,Pmax,hmin,PWJ,w,p)
p在这个子程序中已被赋值
vb声明语句:
Declare Sub PROMAIN Lib "E:\study\PRO200\Debug\Debug\Debug.dll" (xdjx As Single, oilnd0 As Single, D As Single, DL As Single, sp As Single, PXL As Single, X As Single, Y As Single, WP As Single, hmin As Single, Pmax As Single, PWJ As Single, w As Single, P As Single)
vb 语句:
Call PROMAIN(xdjx, oilnd0, D, DL, sp, PXL, X, Y, WP, Pmax, hmin, PWJ, w, P)
运行vb提示错误 ByRef参数类型不符
仅仅关注P数组就好,没有p数组运行正常 跪求高手指点
在线等待···
fortran代码如下:
subroutine PROMAIN(xdjx,oilnd0,D,DL,sp,PXL,X,Y,WP,Pmax,hmin,PWJ,w,p)
p在这个子程序中已被赋值
vb声明语句:
Declare Sub PROMAIN Lib "E:\study\PRO200\Debug\Debug\Debug.dll" (xdjx As Single, oilnd0 As Single, D As Single, DL As Single, sp As Single, PXL As Single, X As Single, Y As Single, WP As Single, hmin As Single, Pmax As Single, PWJ As Single, w As Single, P As Single)
vb 语句:
Call PROMAIN(xdjx, oilnd0, D, DL, sp, PXL, X, Y, WP, Pmax, hmin, PWJ, w, P)
运行vb提示错误 ByRef参数类型不符
仅仅关注P数组就好,没有p数组运行正常 跪求高手指点
在线等待···