Create String Array Vba Syntax Substring Crystal Reports