vb.net 判定excel文件是否打开

在VB.NET中，你可以通过访问Excel应用程序的`Workbooks`属性来检查一个特定的工作簿是否正在运行。例如，如果你想判断名为"Example.xlsx"的文件是否已经由`Application`打开，可以这样做：

Imports Microsoft.Office.Interop.Excel

Dim excelApp As New Application

' 判断工作簿是否已打开
If Not excelApp.Workbooks.Contains("Example.xlsx") Then
    Console.WriteLine("Excel文件 Example.xlsx 没有打开")
Else
    Console.WriteLine("Excel文件 Example.xlsx 已经打开")
End If

' 关闭Application释放资源
excelApp.Quit()
Marshal.ReleaseComObject(excelApp)

这段代码首先创建了一个Excel应用程序实例，然后通过`Contains`方法检查指定的工作簿名是否存在于当前活动的应用中。如果不存在，就说明文件未打开；反之，则表示文件已被打开。