VB6で、タブの上にあるコントロールを取得したいと思っています。
現在は、以下のようなコードになっています。
Dim c As Control
For Each c In Me.Controls
If c.Container Is SSTab1 Then
Debug.Print c.Name
End If
Next c
この状態ですと、タブの上にあるコントロールが全て取得できますが、
あるページの上にあるコントロールだけ取得する方法はないでしょうか?
> あるページの上にあるコントロールだけ取得する方法はないでしょうか?
特定のページ上の物だけを取得する事はできません。
各コントロールのTagプロパティにページ番号を入れておくなどして、
自前で管理するようにしてみてください。
なお、現在のページ上にあるかどうかだけならば、
各コントロールのLeftプロパティで、ある程度の判断はできます。