tab移動について (ID:106844)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 ひとつのオプションボタンにフォーカスが当たった時点で 同じグループのほかのオプションボタンのTabStopはFalseに 設定されるようです。 なので、各オプションボタンのGotForcusイベント内で、 同グループのオプションボタン全てについてTabIndexを Trueに設定し直してあげればTab移動できるようになります。 オプションボタンがコントロール配列なら Private Sub Option1_GotFocus(Index As Integer) For i = 0 To Option1.UBound Option1(i).TabStop = True Next End Sub という感じでいいのですが、質問の通りOption1、Option2 と別名になっているのであれば、それぞれのオプションボタンの GotForcusイベントについて記述する必要があると思います。 Private Sub Option1_GotFocus() Option2.TabStop = True End Sub Private Sub Option2_GotFocus() Option1.TabStop = True End Sub