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这一块的需求，还是在读书的时候弄过这东东，当时求伯君巨偶像