VB6 フレームとオプションボタンについて 2

abc 2007-09-13 02:44:28 No: 137444

・前の続きです。
フレームから逆にオプションを選択できるプロパティはありますか？

上のような場合に
Frame1からOptionの名前を取得するような方法とかありましたら
ご教授ください。

【過去ログ】
http://madia.world.coocan.jp/cgi-bin/VBBBS2/wwwlng.cgi?print+200709/07090030.txt

matsu 2007-09-13 02:58:36 No: 137445

For Eachでループして、コンテナの名前で判断してみては？

Dim objCtr As Control

For Each objCtr In Me.Controls
    If Not objCtr.Container Is Nothing Then
        If objCtr.Container.Name = "Frame1" Then
            MsgBox objCtr.Name & "のコンテナは" & objCtr.Container.Name & "です。"
        End If
    End If
Next