VBScript: Objet de Passage à la Fonction?

L'exemple ci-dessous génère une erreur:

VBScript erreur de compilation: Impossible d'utiliser les parenthèses lors de l'appel d'un Sous

Cette erreur ne se produit pas si tous les paramètres ne sont pas des objets.

Est-il une façon spéciale pour passer les paramètres de l'objet aux fonctions VBScript?

Option Explicit

Dim obj

Function TestFunc(obj)
 WScript.Echo "Why doesn't this work?"
End Function

Set obj = CreateObject("Scripting.Dictionary")
obj.Add("key", "val")

TestFunc(obj) ' Error here!