我今天在尝试以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都独立而不互相影响呢?

DLL档的问题可能比较大

写dll不妨retuen讯息，这样才能了解是否正常执行，出错时也可知道问题发生在哪，小弟引用厂商提供的dll大多会这样写，也比较有利于厂商除错