Creare array di oggetti
Vai alla navigazione
Vai alla ricerca
Gli esempi che faremo, vedranno la creazione di un array indefinito di oggetti.
1 - Uso del metodo .Add con un oggetto array e con specificazione dell'elemento dell'array nel quale inserire la Label:
' Gambas class file
Private obj As New Object[]
c As Integer
i As Integer
Public Sub Button1_Click()
obj.Add(Label)
obj[i] = New Label(Me)
' Viene mostrata la Label sul form:
With obj[i]
.X = 10 * i
.Y = c
.width = 100
.height = 20
.text = "Nuova Label"
End With
c += 30
Inc i
End