fortran 显示has exited with code 1(0x1)怎么办

我现在在用Microsoft Developer Studio 编程，点compile后没有错误，只有警告，并且都是显示有变量未使用，但是运行后就显示has exited with code 1(0x1)，并且调试会立刻终止，这是为什么？
同时重新进去后发现我又要Compile一次

img

img

img

img

fortran station 4.0 太老了，还是找一个98或者xp的虚拟机运行吧

换个新编译器，调试吧
https://www.bilibili.com/video/BV1oh411o7AT?p=2

根据提供的参考资料和问题描述，该问题涉及到使用Microsoft Developer Studio进行Fortran编程时出现“exited with code 1(0x1)”错误的解决办法。

根据参考资料的段落0，该错误可能是由于程序本身存在问题导致的。可以尝试以下解决方法：

  1. 检查程序是否存在未初始化变量、野指针、空指针等问题。这些问题可能导致程序在运行时出错并异常退出。

  2. 在Microsoft Developer Studio中进行调试。可以将程序导入到Visual Studio中进行调试，通过检查堆栈追踪和变量的值来找到错误的原因。

在开始调试之前，确保已使用适当的编译选项将程序编译成支持调试的可执行文件。可以尝试在编译选项中添加"-g"选项以启用调试模式。

以下是一些示例代码来说明如何在Microsoft Developer Studio中进行调试：

! 标记用于指示可执行文件的调试模式
! 要以调试模式编译程序，请在编译命令行或Makefile中添加-g选项
program my_program
    implicit none
    integer :: i, sum

    ! 初始化变量
    sum = 0

    ! 计算和
    do i = 1, 10
        sum = sum + i
    end do

    ! 输出结果
    print *, "Sum =", sum

    ! 等待调试器附加
    call attach_debugger()

    ! 其他代码

    ! 终止程序
    stop

contains

    subroutine attach_debugger()
        ! 用于等待调试器附加的子程序
        ! 在Visual Studio中，通过插入断点来触发调试器的附加

        ! 等待调试器附加
        ! 在Visual Studio中，通过插入断点来触发调试器的附加
        ! 将程序暂停，直到调试器附加为止
        pause
    end subroutine attach_debugger

end program my_program

希望这些信息对您有所帮助。如果这些方法不能解决问题，或者您对问题描述不准确，请再次提供更详细的信息或尝试与Fortran专家进行进一步的沟通。