SSTab内のコントロールにフォーカスを移すには？

解決

くろねず 2003-01-30 02:16:06 No: 105946

今SSTab内にリストビューコントロールを配置しているのですが
Tab切り替え時にクリックされたTab内にあるリストビューコントロールに
フォーカスを移したいのですがどうしたらよいでしょうか。
Tab数は４つです。
SSTabのクリックイベントにSetFocusメソッドを書き込むことで実現しようと
したのですが、コントロールが隠れてしまってうまくいきません。
SendKeysでTabキーを送る方法も試しましたが結果は同じでした。
よろしくおねがいします。

nanashi 2003-02-01 21:55:43 No: 105947

SetFocusの前にDoEventsをやってみたら？

Say 2003-02-03 08:01:54 No: 105948

クリックしたタブでFocusするコントロールを変更したいなら、
たとえばこんなかんじ

Option Explicit

Private Sub SSTab1_GotFocus()
    Select Case SSTab1.Tab
        Case 0
            Text1.SetFocus
        Case 1
            Text2.SetFocus
        Case 2
            Text3.SetFocus
    End Select
End Sub

くろねず 2003-02-03 23:39:28 No: 105949

nanasiさん、Sayさんご回答ありがとうございます。
SetFocusの前にDoEventsを実行することにより解決しました。
有り難うございました。