要在GPU上运行Fortran程序，您可以按照以下步骤操作：
安装PGI编译器
PGI（Portland Group Compiler）是一个商业编译器，支持Fortran语言，并且提供了对NVIDIA GPU的支持。您需要安装PGI编译器及其相关组件。
安装时，请确保安装Visual Studio 2015和PGI 2017 Update 4。
安装Windows SDK 10
根据PGI安装过程中的提示，您可能需要安装Windows SDK 10。这一步骤取决于您在安装PGI时是否收到相关提示。
编写Fortran代码
在Visual Studio中编写您的Fortran代码，并保存为`.f90`文件。
使用PGI命令行编译
将PGI的安装目录中的`pgi.bat`文件复制到您的代码目录下。
在代码目录中打开命令行，并运行`pgi`命令来编译您的`.f90`文件。例如：
```
pgf95 sample2_1.f90 -Mcuda
```
编译成功后，会生成一个可执行文件（例如`sample2_1.exe`）。
运行GPU程序
在命令行中，使用以下命令运行您的GPU程序：
```
./sample2_1.exe
```
示例代码
```fortran
program device
use cudafor
implicit none
type（cudaDeviceProp）::prop
integer::ndevices=0,i,ierr
ierr = cudaGetDeviceCount（&ndevices）
if （ierr /= 0） then
write（*,"（'No GPU devices found.'）"）
return
end if
write（*,"（'Number of GPU devices:',i0）"）
do i = 1, ndevices
call cudaGetDeviceProperties（prop, i）
write（*,"（'Device ',i0,' compute capability:',i0,'.',i0）"）
end do
end program device
```
注意事项
确保您的系统满足PGI编译器的系统要求。
在编译和运行过程中，可能会遇到依赖库缺失的问题，需要确保所有必要的库都已正确安装。
如果您的代码中有大量的并行计算任务，可以考虑使用OpenMP或其他并行计算库来进一步提高性能。
通过以上步骤，您应该能够在GPU上成功运行Fortran程序。