如何在面向.NET 7.0的VB项目中实现Excel延迟绑定？

一、能否让.NET 7.0与.NET Framework 4.7.2行为一致？ #

可以通过调整项目配置和代码写法实现接近一致的效果，核心是恢复VB的COM后期绑定能力：

1. 设置编译选项：在项目设置中开启Option Strict Off（或在代码文件顶部添加Option Strict Off），这是.NET Framework中默认的行为，能让VB自动处理COM对象的动态属性/方法调用。
2. 配置项目文件：在.vbproj中添加以下配置，启用旧版COM互操作兼容行为：

   <PropertyGroup>
     <EnableComHosting>true</EnableComHosting>
     <EmbedInteropTypes>false</EmbedInteropTypes>
   </PropertyGroup>
   

3. 引用Interop包：安装Microsoft.Office.Interop.Excel NuGet包，确保COM类型定义可用。

完成以上配置后，原有的代码就能在.NET 7中正常运行，和.NET Framework下的行为一致。

二、必须处理动态属性/方法时的实现思路 #

如果需要更灵活的动态调用控制，或者无法开启Option Strict Off，可以从以下方向入手：

• 使用Dynamic类型声明变量：将所有COM对象变量声明为Dynamic而非Object，让DLR（动态语言运行时）自动解析运行时的属性和方法，示例代码：

  Dim myExcelApp As Dynamic = CreateObject("Excel.Application")
  myExcelApp.DisplayAlerts = False
  myExcelApp.ScreenUpdating = False
  myExcelApp.Visible = False
  Dim myExcelWb As Dynamic = myExcelApp.Workbooks.Add
  myExcelWb.Sheets.Add()
  Dim myExcelWs As Dynamic = myExcelWb.Sheets(1)
  

• 反射调用InvokeMember：通过反射显式调用COM对象的属性和方法，适合需要严格类型检查的场景，示例：

  Dim myExcelApp = CreateObject("Excel.Application")
  ' 设置DisplayAlerts属性
  myExcelApp.GetType().InvokeMember(
      "DisplayAlerts",
      BindingFlags.SetProperty Or BindingFlags.Public Or BindingFlags.Instance,
      Nothing,
      myExcelApp,
      New Object() {False}
  )
  ' 调用Workbooks.Add方法
  Dim myExcelWb = myExcelApp.GetType().InvokeMember(
      "Add",
      BindingFlags.InvokeMethod Or BindingFlags.Public Or BindingFlags.Instance,
      Nothing,
      myExcelApp.GetType().InvokeMember("Workbooks", BindingFlags.GetProperty, Nothing, myExcelApp, Nothing),
      Nothing
  )
  

• 添加DLR支持：确保项目引用System.Dynamic和Microsoft.CSharp NuGet包，为动态调用提供必要的运行时支持。

内容的提问来源于stack exchange，提问作者ApeMuhnkey