Create CopyArraySubSetToArray.bas