how to Pass Optional Parameters in VBS?

[Skepsis]

Simple, use dictionaries from a string (example not functioning code)

Code:

call X("param1::value1^^param2::value2")

function X(aDict)
dict = call decodeDict(aDict)
  if dict("param1") <> "" then pm1 = dict("param1") else pm1 = ""

OR

make all passable parameters global ( not recomended )

Of cause how you break up the dict and return it I leave to you