Ciao a tutti vorrei chiedervi come da titolo come si creano deglio array di oggetti dal sorgente ad esempio io oggi cercavo di creare un array oggetto ma non funziona.
Private Sub Command1_Click()
Dim testo(5) As Label
Dim i As Integer
i = 0
While i <> 5
testo(i).Caption = "testo"
i = i + 1
Wend
End Sub
voi mi sapreste dire qual è l'errore nel codice e come farlo diventare dinamico
grazie
Private Sub Command1_Click()
Dim testo(5) As Label
Dim i As Integer
For i = 0 To 5
Load testo(i)
testo(i).Left = i * 40
testo(i).Visible = True
Next i
End Sub
per usare Load() devi crearti prima un'oggetto label sul form con index = 0 e poi usi la funzione... caricando load NomeOggetto(X) e incrementi X per creare nuove label