Exit for のこんな使い方も見つけました。
Sub 地区リスト（）
Dim tikuId as long
For tikuId = 0 to fraTiku.controls.count - 1
If fraTiku.Controls(tikuId).Value = True Then
tikuName = fraTiku.Controls(tikuId).Caption
Exit For
Next
私はまだ自分仕様のフォームを作ったりするレベルには至っていませんが、
以前、講習会で教えてもらったサンプルです。
フォームとイベントの概念が分かっていないと難しいですが、
要は、fraTiku というオブジェクトの中の
（オブジェクトでいいのかなあ？）IDを選び出して
ループを抜けるということです。
今、自分で書いてみて、なるほどと思いました。