决定企业集团高层竞争力的基本因素是（）。

A.核心层企业的市场位置是否稳固

B.核心层企业的市场位置是否垄断

C.核心层企业的市场位置是否广泛

D.核心层企业的市场位置是否趋向重量级

设有如下程序： Private Sub search(a()As Variant，ByVal key As Variant，index%)Dim I％For I = Lbound(a)To Ubound(a)If key=a(I)Then index=I Exit SubEnd IfNext Iindex=-1 End Sub Private Sub Form_Load()ShowDim b()As VariantDim n As Integerb=Array(21，64，92，15，72，38，45，72)Call search(b， 45， n)Print n End Sub 程序运行后，输出的结果是

A．2

B．6

C．10

D．12