VBScript 异或函数