PB中OLE调用WPS的ET出错,帮忙看一下~该如何处理

PB中OLE调用WPS的ET出错,帮忙看一下~
我用OLE调用ET的函数IRR,提示错误,我已有红色提示,请大家指点一下~谢谢
decimal ld_arr[]
decimal ld_jz

Et = CREATE OLEObject
  li_Etok = Et.ConnectToObject("Et.application")
  if li_Etok < 0 then  
  li_Etok = Et.ConnectToNewObject("Et.application")  
  if li_Etok >= 0 then  
  Et.visible=false
  ld_ret = Et.ActiveWorkbook.ActiveSheet.Irr(ld_arr,ld_jz)
  Et.quit()
  Et.DisConnectObject()
  destroy Et
  end if  
  end if

[解决办法]
提示的是空对象还是函数不存在之类的？楼主需要把错误信息贴上来呀，
没有WPS这一块的需求，还是在读书的时候弄过这东东，当时求伯君巨偶像