Loading option buttons at runtime

[IGBP]

Hi everyone,
I am using this code to load 5 frames at form load. I need to load 2 option buttons into each frame. I can get an option button to load on the form, but not be contained in the frame(s). Is it possible?
On the form, I have a frame with Index set to 0 and 2 option buttons, each named Option1 with indexes of of 0 and 1.

Dim i As Integer

     For i = 1 To 5
          Load Frame1(i)
               With Frame1(i)
                 .Top = Frame1(i - 1).Top + _
                    Frame1(i - 1).Height + 10
                 .Visible = True
                 .Caption = "Frame" & (i + 1)
               End With
     Next i

Thanks,
Michael

[DiGiTaIErRoR]

Use the SetParent API to make the frame the owner. It'll then be in it, and there's no chance of escape!

Public Declare Function SetParent Lib "user32" Alias "SetParent" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long

There's the declare.

[IGBP]

Darn ...
Now I am forced to learn programming to the API! I knew it was going to happen soon, but did not want that time to be today.
Thanks
Digital

[DiGiTaIErRoR]

Originally posted by IGBP
Darn ...
Now I am forced to learn programming to the API! I knew it was going to happen soon, but did not want that time to be today.
Thanks
Digital

SetParent Option1.hwnd, Frame1.hwnd