如果关闭打开文件的程序

请教各位老师，如何关闭打开文件的程序？谢谢！
icstr = GETFILE()
oApp = CREATEOBJECT("Shell.Application")
oApp.ShellExecute(icstr,,,,1)
icstr是：c:\1.pdf或者其他文件
如何关闭调用1.pdf的程序？问题是，不一定是pdf文件，也可能是其他文件，如doc文件等

是这样：程序中打开1.pdf或其他文件异常，桌面没有反应，后台实际这个文件是被打开程序占用着，程序中如果删除或者操作这个文件会出错，需要终止这个后台程序，但是，用户又不知道这个问题。

[此贴子已经被作者于2022-3-12 22:05编辑过]