>>48

こんなもんかねぇ。ヘルプも見てないで間違ってるかも。

For I = 0 To Form1.Controls.Count - 1
　If Form1.Controls(I).Container Is Frame1 Then

　' 処理

　End If
Next