Function SendToVBA(Formula,A2,A1,B2,B1,D1,D1,D3,D4,G1,G2,G3,G4,Open1,Close1,High1,Low1,StkLabel1,MarketLabel1)
'这是从公式中传来的行情数据
VBA_A2=A2
VBA_A1=A1
VBA_B2=B2
VBA_B1=B1
VBA_D1=D1
VBA_D2=D2
VBA_D3=D3
VBA_D4=D4
VBA_G1=G1
VBA_G2=G2
VBA_G3=G3
VBA_G4=G4
VBA_OPEN=Open1
VBA_CLOSE=Close1
VBA_HIGH=High1
VBA_LOW=Low1
VBA_StkLabel=STKLABEL1
VBA_MARKETLABEL=MarketLabel1
If VBA_A1=3 then '如果是第3周期，执行开仓或平仓操作
OpenOrder
End if
SendToVBA=1
End Function
以上代码是自定义函数，目的是要将行情数据传到VBS后台，然后在后台实现开单、平仓等操作，可是VBS代码编译时出现：
编译器错误1041：名称重定义
请高手们帮我看看。
说明：VBA_A1,VBA_A2等是在VBS中定义的public型变量
是不是参数个数超过了限制呢？那么参数最多是多少个？