Bom dia

 

Estou precisando criar controles via código em um form de meu projeto, porém gostaria que este "novo controle" criado ficasse dentro de um Frame já existente no form. Alguém saberia como posso fazer isto? Abaixo está até onde faço no código, levando em consideração que um Frame chamado Descricao já existe no form:

 

Private Sub BotaoAbre_Click()

    dim Campo as Control

    set Campo =  me.controls.add ("Vb.TextBox", "Nome")

    Campo.Visible = True

    'até aki eu faço porém como faço pra que essa textbox fique dentro de um frame

    'já criado no form?

End Sub

 

Desde já agradeço.

Use a API do Windows SetParent, passando para ela o HWnd do Textbox e do Frame:

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

Private Sub Captura(NovoControle as Object, ControlePai as Object)

 

    Dim Resp as Long

 

    REsp=SetParent(NovoControle.Hwnd, ControlePai.Hwnd)

 

End Sub

 

Para usar, basta chamar Captura(Campo.hwnd, Frame1.hwnd)