[VB6] Creare in esecuzione delle TextBox e delle Label

[Folcus]

Ciao, volevo sapere se c'è un modo per creare in fase di esecuzione delle lable e delle textbox...
Ossia, vorrei riportare in un form i dati contenuti in un DB...ma a priori non posso sapere quanti record sono presenti...quindi dovrei creare le lable e le textbox in base al numero di record, appunto. E poi, consecutivamente popolare questi nuovi elementi creati con i dati del DB.
C'è un modo? e se sì, quale?

[multijet]

mi sembra una scelta un po' ardita.Forse conviene visualizzare i dati iu un datagrid o una list view.

[LMondi]

Ciao Folcus,
si può fare, una volta ho realizzato un progetto del genere, poi dipende da quanti controlli devi inserire, se usi solo un DB o se salvi anche i dati in un file, ecc, ecc.... Più sono le combinazioni e più complicato è il programma. Comunque ti posto un esempio di clonazione di una Txt (per la Lbl è la stessa procedura):
prima di tutto disegna una Text1 con Index = 0, poi per caricare le successive devi fare:

Private Sub Command1_Click()
    Dim n As Integer
    Dim k As Integer
'significa che voglio aggiungere 5 controlli:
    n = 5
    For k = 1 To n
        'carico il nuovo Text1:
        Load Text1(Text1.Count)
        ' sposto il nuovo Text1 sotto il precedente:
        Text1(Text1.Count - 1).Move Text1(k - 1).Left, Text1(k - 1).Top + (Text1(k - 1).Height)
        
        ' poi li rendo visibili:
        Text1(Text1.Count - 1).Visible = True
    Next k
End Sub

[Folcus]

perfetto, grazie mille. le righe di codice che mi hai scritto fanno esattamente quello che cercavo.
Grazie milla.