我今天在尝试以VB6来呼叫dll档时，遇到两种情形 上网查了之後，还是不太知道怎麽解决="= 前情提要： 我写了一个Fortran档，用Program开头，转成dll档之後进入的端口是MAIN_ (我也有改写成Subroutine过，两者结果会一样，所以不是转档出问题) 程式内容大略为 Program 宣告变数 Open档案，读取设定值 Open档案，用来输出答案 利用设定值进行模拟运算(很复杂的矩阵跟回圈运算) 收敛之後将结果输出 End Program 此时，我利用VB呼叫dll档近来，程式码为 Private Declare Sub MAIN_ Lib "BaseCase.dll" () Private Sub Command1_Click() Call MAIN_ End Sub 此时遇到了第一个问题，程式正确的被执行了，而且我确定其结果有收敛 因为我在收敛之後会输出答案，而Output file的数据停在答案的一半不到 换个方向讲就是，程式跑完之後，不知道什麽原因，答案的Write只执行到一半 程式就被关闭了(不管是在编译器内或者输出成EXE档，他都会自动关闭 我本来有想说会不会是因为我的输出数据过多，因此我就尝试写了另一个新的档案 让他输出整数1到50000，结果没问题(若要输出1到50万，则会显示堆叠空间不足) 因此我想说是不是因为我把太多数据都写到同一个TXT档内，才会导致程式自动关闭? (他这部分就没有显示任何讯息，突然就关闭了) 接着，我将Output的资料分开写，写到两个不同的file内，此时软体可以正常的执行 然後将所有数据都输出 (因为我在最後有叫他输出一个计算时间，因此我可以确定全部都有输出 But，第二个问题出现了，我一样用上面的那些程式码执行 在我按第一次执行的时候，他可以得到正确的答案 但是当我再按一次时，程式又会直接关闭 (但是有执行，依照输出结果来看，是跑到一半就停掉了) 我此时检查output档案，可以发现我的两个output档 有其中一个有被改写，另一个则是原封不动，这表示我的程式在边模拟边输出时当掉了 (这部分我是怀疑说是不是因为我的Fortran内的Open指令设定为 OPEN(UNIT=8,FILE="INPUT_DATA_FILE.TXT") OPEN(UNIT=9,FILE="OUTPUT_DATA_FILE.TXT") 没有给status所导致，但是我依旧无法理解说，为什麽程式会执行到一半自动关闭? 还有，为什麽我的程式明明已经顺利模拟完了，却会在输出时写到一半就关掉了? 我是有想到说利用下面这种方法，直接呼叫我的执行档，这样的话就可以无限次点取了 (每次模拟都等於呼叫一次执行档，因此各自独立不影响) Private Sub Command1_Click() Shell ("cmd /C BaseCase.exe") End Sub 但我还是希望用成dll档的形式，这样未来在使用上也会比较方便 希望有好心的乡民们教小弟如何避免上述情形 应该如何让每次的call dll都独立而不互相影响呢? --

※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 140.112.23.91 ※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Visual_Basic/M.1422449649.A.1AF.html