Object VBS-如何将对象作为参数传递给函数

Object VBS-如何将对象作为参数传递给函数,object,vbscript,Object,Vbscript,我正在编写一个小脚本,在VBS中做这个决定是错误的 ... result = FindAndUpdate(objDictionary, id) ... Function FindAndUpdate(objDictionary, id) MsgBox(objDictionary.Count) FindAndUpdate = true End Function 现在,我正在与毫无意义的事情作斗争。我正在将Dictionary对象传递给函数。在函数MsgBox(objDictiona

我正在编写一个小脚本,在VBS中做这个决定是错误的

...
result = FindAndUpdate(objDictionary, id)
...
Function FindAndUpdate(objDictionary, id)
    MsgBox(objDictionary.Count)
    FindAndUpdate = true
End Function
现在,我正在与毫无意义的事情作斗争。我正在将Dictionary对象传递给函数。在函数MsgBox(objDictionary.count)中执行,我在警报框中得到数字15,但立即在同一行报告错误所需对象:“objDictionary”


非常感谢您的帮助

您可以添加对objDictionary的检查,如果objDictionary不存在,请退出您的函数:

Function FindAndUpdate(objDictionary, id)
  If Not IsObject(objDictionary) Then
    FindAndUpdate = false
    Exit Function
  End If

  MsgBox(objDictionary.Count)
  FindAndUpdate = true
End Function

UH好。是我的错。因为所有的代码都在循环中。有一种情况是,客观的假设等于零。