您所在位置：主题：VB工程中调用DLL出现错误'453'，但是写成EXE则没有！
rundash
[专家分：0] 发布于 2009-04-03 03:22:00
如题，希望该标题能吸引诸位高手进来。
我之前在XP下用该工程调用DLL很正常，DLL是用FORTRAN编写的。
我所做过的事情就是，进了VISTA下运行VB的工程，调用DLL，出现错误'453'。
之后我回到XP下，再运行该VB工程，则我昨天写的两个接口出现错误'453'，中间我没有改过任何语句。然而将VB写成EXE去运行，调用却正常。
不知道为什么，希望各位高手能解答，我已经无能为力了。
以下两个接口的声明和调用（VB下）的代码：
声明：
Public Declare Sub IOMTL Lib "A.DLL" (LMDT1 As Single, CPT1 As Single, AT1 As Single, SPEGRA1 As Single)
Public Declare Sub IOPTWTC Lib "A.DLL" (PTWTC1 As Long)
调用：
Call IOMTL(LMDT(1, 1), CPT(1, 1), AT(1), SPEGRA(1))
Call IOPTWTC(PTWTC)
我之前在XP下用该工程调用DLL很正常，DLL是用FORTRAN编写的。
我所做过的事情就是，进了VISTA下运行VB的工程，调用DLL，出现错误'453'。
之后我回到XP下，再运行该VB工程，则我昨天写的两个接口出现错误'453'，中间我没有改过任何语句。然而将VB写成EXE去运行，调用却正常。
不知道为什么，希望各位高手能解答，我已经无能为力了。
以下两个接口的声明和调用（VB下）的代码：
声明：
Public Declare Sub IOMTL Lib "A.DLL" (LMDT1 As Single, CPT1 As Single, AT1 As Single, SPEGRA1 As Single)
Public Declare Sub IOPTWTC Lib "A.DLL" (PTWTC1 As Long)
调用：
Call IOMTL(LMDT(1, 1), CPT(1, 1), AT(1), SPEGRA(1))
Call IOPTWTC(PTWTC)