forの中をDo-Loopで囲んで脱出したい時はExit Doする