RosettaCodeData/Task/Hello-world-Graphical/Fortran/hello-world-graphical-2.f
2023-07-01 13:44:08 -04:00

5 lines
123 B
Fortran

program hello
use user32
integer :: res
res = MessageBox(0, "Hello, World", "Window Title", MB_OK)
end program