VB自定义数据类型参数传递报错“DLL调用约定错误”
我用vb调用fortran
刚开始一直说找不到文件 我的字符串传递过去就是文件名
我输入10080120.012
用str()时候好像是对的 但是文件名变成\ 10080120.01了
用cstr或者format时候就直接说“DLL调用约定错误” 不知道什么问题 求高手帮助.
Private Declare Function Srhba Lib "F:\zy2\srhba\Debug\srhba.dll" (ByVal day As String) As Single
Private Sub Command1_Click()
Dim Jz As Single
Dim day As String
day = cstr(Text1.Text)
Jz = Srhba(day)
Text3.Text = Str(Jz)
End Sub
[解决办法]
·VB将数据写到一个临时文件比如in.txt中
·VB用Shell语句调用Fortran写的exe文件
·Fortran程序从文件in.txt中读取数据,处理后写入out.txt文件中
·VB读文件out.txt的内容处理
[解决办法]
将函数返回类型定义为字符或Double型,Single型的转后会产生这个问题