主题：判断文件是否打开

我在一项目窗口按钮中设置如下代码来关闭另一个项目：

If FileIsOpened("E:\车间数据库\Publish\佶龙机加二车间数据管理系统")= True Then '判断一个项目文件是否打开
    Dim Proc1 As New Process '定义一个新的Process
    Proc1.File = "E:\车间数据库\Publish\佶龙机加二车间数据管理系统" '指定文件路径
    Proc1.Close()'关闭文件
End If

 

请问以上代码问题在哪里。谢谢

谢谢C版，怎么才能关闭指定的文件呢？

Dim Proc1 As New Process '定义一个新的Process
Proc1.File = "E:\车间数据库\Publish\佶龙机加二车间数据管理系统" '指定文件路径
Proc1.Close()'关闭文件

代码关闭狐表的指定（非本项目）项目怎么写，谢谢