[RESOLVED] Define Parent object of a control - Runtime

[RS_Arm]

Hello guys.

My app accepts to drag a button on a frame, but the button is not in the frame. My frame is in a SSTab

Private Sub Frame1_DragDrop(Source As Control, x As Single, y As Single)
Select Case Source.Name
    Case "NovoBotao":
        Set botao = Controls.Add("VB.CommandButton", "btnButtonThree")
           With botao
              .Visible = True
              .Width = 1000
              .Caption = "Third Button"
              .Top = y
              .Left = x
              .Parent = Me.Frame1    'this doesnt seem to work
              
           End With
    
End Select
Debug.Print Source.Name

End Sub

how can I do this?

Thank you