从VB6.0调用时，DLL中的Fortran ` `read(*，*)`会导致“运行时错误(39)”
从VB6.0调用时，DLL中的Fortran read(*,*)会导致“运行时错误(39)”。
这个错误通常是由于VB6.0与Fortran之间的数据类型不匹配导致的。在VB6.0中，read(*,*)是Fortran中的一种读取输入的语句，用于从控制台或文件中读取数据。然而，VB6.0与Fortran在数据类型上存在差异，因此在调用DLL中的Fortran代码时，需要确保数据类型的一致性。
要解决这个问题，可以采取以下步骤：
- 确保VB6.0与Fortran之间的数据类型匹配。例如，如果Fortran中使用的是整数类型，那么在VB6.0中也要使用相应的整数类型。
- 在VB6.0中使用
Declare语句声明DLL中的Fortran函数或子程序。在声明时，确保参数的数据类型与Fortran代码中的数据类型一致。 - 在调用DLL中的Fortran函数或子程序之前，将数据转换为正确的数据类型。可以使用VB6.0中的类型转换函数，如
CInt、CDbl等。 - 确保DLL文件与VB6.0项目在同一目录下，并且正确引用了DLL文件。
- 检查Fortran代码中的其他可能导致错误的地方，如数组越界、空指针等。
总结起来，解决这个问题的关键是确保VB6.0与Fortran之间的数据类型一致，并正确地传递参数。如果仍然遇到问题，可以进一步调试代码或查阅相关文档以获取更多帮助。
腾讯云相关产品和产品介绍链接地址：
- 腾讯云云服务器（CVM）：https://cloud.tencent.com/product/cvm
- 腾讯云函数计算（SCF）：https://cloud.tencent.com/product/scf
- 腾讯云数据库（TencentDB）：https://cloud.tencent.com/product/cdb
- 腾讯云人工智能（AI）：https://cloud.tencent.com/product/ai
- 腾讯云物联网（IoT）：https://cloud.tencent.com/product/iotexplorer
- 腾讯云移动开发（移动推送、移动分析等）：https://cloud.tencent.com/product/mobile
- 腾讯云对象存储（COS）：https://cloud.tencent.com/product/cos
- 腾讯云区块链（BCS）：https://cloud.tencent.com/product/bcs
- 腾讯云元宇宙（Tencent XR）：https://cloud.tencent.com/product/xr
相关·内容
VB6.0中的代码是： Dim c As Single b = 2# Text1.Text = cFortran
浏览 43提问于2017-02-11得票数 2
回答已采纳
5回答
我在VB6中使用以下语法声明和调用dll函数：Private Declare Sub MYFUNC Lib "mylib.dll" ()
MYFUNCdl
浏览 0提问于2013-01-11得票数 6
回答已采纳
为什么gfortran在这里没有显示任何read语句的编译错误？ character(len=2) :: xend program
浏览 3提问于2015-08-31得票数 1
回答已采纳
我试图从Fortran 2003中的一个网格文件中读取数据，但是我得到了一个意外的文件运行时错误。文件中的一些行似乎被read命令跳过了。1 1132 1131 1165我想从每一行读取第一个整数，所以我的程序是：
program read_
浏览 4提问于2015-04-09得票数 1
回答已采纳
我想使用asio从串行设备读取数据，并在字节可用时处理它们。
在使用async_read_until时，我的回调大部分时间都会因为文件结束错误而被调用。因此，我需要退出回调并重新注册，直到数据可用。这会导致一个繁忙的循环，这是我想要防止的。类似的情况也发生在read_until上，它会立即返回相同的EOF错误。对于POSIX，有poll可以有效地等待，直到设备上<
浏览 7提问于2017-06-19得票数 1
2回答
我和R一起工作，但是需要做大量的数字运算，这是我想在fortran做的。我对R和fortran都是新手.我已经有一个工作的R计划，我想优化。我创建了一个Fortran程序来解决一个ODE系统，我把它保存在一个子程序中。另外，我还使用一个名为aux.f90的模块来存储参数，并使用一个函数来创建一个信号，该信号被输入到方程中。这按照预期工作，数据保存在一个.txt文件中。
我现在要做的是创建一个R前端，
浏览 0提问于2014-04-20得票数 5
回答已采纳
我正在与MFC战斗，动态地将DLL与LoadLibrary连接。当应用程序调用DLL，而DLL在同一个调用中调用时，我似乎无法正确地获得MFC状态。最终，它会导致大量的断言。下面是我正在做的代码模拟。
因此，这个应用程序(CTheApp1View::OnTestRun1)加载一
浏览 3提问于2011-12-14得票数 4
回答已采纳
1回答
只有在Windows 7上从Visual 2013生成的可执行文件中调用Fortran DLL时，才会发生此异常。当我使用来自Visual 2005可执行文件的相同输入调用相同的Fortran DLL时，没有异常，Fortran DLL将产生正确的结果。此外，在Windows SP3上运行Visual 2005解决方案也不会产生错误。
调用
浏览 9提问于2015-02-17得票数 0
1回答
假设这个C-可互操作的Fortran子例程是从Python调用的，并以Python回调函数作为输入参数，然后调用它，Python函数可能如下所示，import ctypes as ct
ff.fortranFunc( getSquareFromPython )
但是，
浏览 1提问于2019-09-06得票数 2
回答已采纳
我在haskell程序中使用了一个外部dll。在某些特殊情况下，dll崩溃。有办法处理这事吗？不幸的是，不存在从dll引发的异常。在ghci中，我得到以下消息: InitNumeric
浏览 3提问于2013-09-23得票数 1
回答已采纳
我的应用程序成功地从Qt Creator运行，但在资源管理器中它会提示缺少dll等等。我在.exe包含目录中复制了QtCore4.dll，QtGui4.dll，但它滥用了与vs运行时相关的东西！( QtCore4.dll和QtGui4.dll哪个合适也是个问题，因为有一些版本大小不同，我认为它们的组合可能会导致错误)
我能做什么
浏览 3提问于2012-05-14得票数 1
回答已采纳
我正在尝试动态加载一个Fortran，并将一个字符串从fortran传递回C#。在fortran代码中，一切看起来都很好，但是当返回到C#时，字符串的值就丢失了。相反，以C#设置的初始值已返回。我曾尝试使用'ref‘关键字来获取要通过引用传递的字符串，但随后我得到了如下所示的错误。我做错了什么？
运行时遇到了致命错误。在线程0x2ac4上，错误地址为0
浏览 0提问于2017-01-23得票数 1
回答已采纳
1回答
我最近在OSx上使用自制软件从6.x升级到gfortran 7.2。我现在从READ语句中得到了以前没有得到的错误。生成错误的最小示例是： CHARACTER :: c READ(c,*) i但是，如果我使用以下命令编译：
gfortran -L/usr/local/lib <e
浏览 0提问于2018-01-19得票数 1
1回答
这个问题以前已经被问过了，我从回顾中学到了很多。尽管如此，我仍然遗漏了这个过程中的一些关键步骤。使用.NET 4.5的Visual Studio 2015使用英特尔Visual Fortran和C#代码编译Fortran程序。我现在正在尝试将Fortran程序之一转换为DLL。这是我第一次尝试开发和实现DLL，我遇到了让一切都正确的问题。希望这个社区中的某个人能引导我朝着正确<em
浏览 15提问于2018-07-31得票数 1
1回答
我将属于多线程C框架的C函数包装在一个python模块中。在这个框架中，当某些事件被触发时，会执行回调。但是，回调并不总是从同一线程执行的。
与我的问题相关的回调是在python ctype中定义的。普通ctype回调的问题是它们试图使用python C-API获取GIL。当此获取从未调用Py_initialize()的
浏览 1提问于2016-11-08得票数 2
2回答
我有一个包含以下文本的文件：-0.615 245.385 ylo yhi我想把行上的数值读入一个3*2的实数矩阵。是否可以只读取一条记录的两个输入并转到下一行？类似于：我在F中打了问号。因为我的数字长度是可变的。我想知道是否可能有一
浏览 4提问于2018-06-12得票数 1
1回答
我们有一个Microsoft应用程序，它整合了我们在eBay上的许多活动。我是通过几个访问引用的com dll来实现这一点的。应用程序的一部分将清单从我们的库存发布到eBay。查了一下，MS说将dll项目升级到Framework4.7或更高版本将修复。我升级了解决方案框架并重新编译。
升级后的dll与eBay一起工作，当我从VS内置的win窗体测试应用程序调用时。当我从</
浏览 11提问于2022-04-04得票数 1
回答已采纳
我在C#中使用P/Invoke从C++ DLL调用本机函数，如下所示：
外部"C“{ //函数:从序列图像创建Wmv视频。我创建C#包装类函数来映射本机C++代码：
DllImport("AVIEncoder.dll"，EntryPoint = "CreateWMV"，CharSet = CharSet.Unicode，CallingConvention= CallingConvention.StdCal
浏览 4提问于2015-06-01得票数 2
回答已采纳
5回答
我已经用非托管的可视化C++编写了一个DLL，使它与C#和C++应用程序一起工作有点困难。下面是C++ DLL中的原型：catch (Exception e) { /* ... */ }
e.Message =“对象引用未设置为对象的</em
浏览 5提问于2011-01-21得票数 2
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
即时通信 IM
实时音视频活动推荐
腾讯云开发者
