几句VB代码用VC怎么写？

Question

VB代码如下：
Dim BomList As Variant
IDatabase.GetBomRecorder BomList
For i = LBound(BomList) To UBound(BomList)
Set IDbBOMRecorder = BomList(i)

Answer 1

VB代码如下： 
Dim BomList As Variant 
IDatabase.GetBomRecorder BomList
For i = LBound(BomList) To UBound(BomList) 
Set IDbBOMRecorder = BomList(i) 
_variant_t varBomList
IDatabase.GetBomRecorder(&varBomList)
接下来的循环，要看varBomList具体什么类型了，是安全数组还是集合类型，写法也不同

Answer 2

IDatabase.GetBomRecorder 
这个接口的方法声明是怎样，vc里对数组的处理和vb不同

Answer 3

HRESULT GetBomRecorder (
        VARIANT * BomVariant,
        _bstr_t IndexKey );