[VB6] Generare Frame in automatico con relativi contenuti

[Folcus]

Torno a voi con un nuovo quesito.

Devo generare in automatico una serie di Frame con il loro contenuto.

allora, uso questo codice:

Private Sub Elementi()
'Moltiplicatore Frame Cliente
    Dim k As Integer
    For k = 1 To 10
        Load Cliente(Cliente.Count)
        Cliente(Cliente.Count - 1).Move Cliente(k - 1).Left, Cliente(k - 1).Top + (Cliente(k - 1).Height + 10)
        Cliente(Cliente.Count - 1).Visible = False
        Cliente(Cliente.Count - 1).Caption = k
    Next k
End Sub

Con questo codice mi genera in automatico i frame (dopo aver creato io il primo frame (cliente(0)). Benissimo.
Ora però il problema. Devo "copiare" anche il contenuto dei frame...textbox e lable...ma se ripropongo il codice usato per i frame non mi genera nulla...

Come posso generare i frame con relativi contenuti?

[mgmg]

Prova ad utilizzare il metodo Controls.Add in questo modo:

  Dim text As TextBox


   'per creare il controllo su un Frame
   Set text = Controls.Add("VB.TextBox", "text", Frame1)

  With text
    .Move 50, 50, 600
    .Visible = True
  End With

ciao