Creare array di oggetti

Da Gambas-it.org - Wikipedia.

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