for i = lbound(strsplit) to ubound(strsplit)