利用fortran调用电脑的计算器后怎么关闭console

vvt

语法规范里没有这个功能。
如果是windows平台，可以试试这样：

注意，win10 不能用 calc 来测试。因为 calc 实际上又运行了 Calculator.exe而这个代码只能结束子进程，不能结束孙子进程。

[Fortran] 纯文本查看 复制代码

  use kernel32
  use , intrinsic :: ISO_C_Binding
  Type(        T_STARTUPINFO) ::stStartUp
  Type(T_PROCESS_INFORMATION        ) ::stProcInfo
  integer i
  Call GetStartupInfo( stStartUp )
  i = CreateProcess( 0 , "c:\windows\system32\notepad.exe"//c_null_char , 0 , 0 , 1 , 0 , 0 , 0 , LOC( stStartUp ) , LOC(stProcInfo) )
  read(*,*) 
  i = TerminateProcess( stProcInfo%hProcess , 0 )
end