Create CountDimensionsInArray.vbs