VBx中For...Each遍历数组的底层实现原理是什么？

• For...Each对SAFEARRAY的遍历是VBx解释器/编译器的特殊内置处理，完全没有依赖COM标准的IEnumVARIANT机制。
  原因很直接：SAFEARRAY只是COM定义的内存结构而非COM对象，既没有IDispatch接口，也没有DISPID_NEWENUM对应的方法。VBx runtime会直接识别SAFEARRAY类型，遍历过程中通过SafeArrayGetElement这类COM底层API直接按索引读取元素，模拟枚举流程，跳过了常规的COM对象枚举逻辑，效率更高。

• 确实存在从SAFEARRAY创建标准IEnumVARIANT的官方方法：OLEAUT32.dll中的CreateEnumVariant函数可以接收SAFEARRAY指针，返回合规的IEnumVARIANT接口实例。但VBx自身遍历SAFEARRAY时并没有使用这个函数，而是采用了专门优化的内置逻辑。

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