A$ = "x_xxx_xx_xx-x"
B$ = Split(A$, "-", 1)