Vettore del tipo di una Classe specifica creata

Da Gambas-it.org - Wikipedia.

E' possibile dichiarare ed instanziare anche una variabile vettoriale del tipo di una Classe specifica creata dal programmatore.


Vediamo di seguito un semplice esempio, nel quale abbiamo una Classe specifica, che chiameremo Class1.class, creata dal programmatore:

Public b As Byte
Public sh As Short
 

Public Function provavettore(valore As Integer) As Integer

 Return valore + 500

End

Mentre nella Classe principale si dichiarerà la Classe secondaria come vettore. Tale vettore del tipo di quella Classe specifica, Class1.class creata, conterrà nei propri elementi variabili ordinarie del tipo di quella medesima Classe specifica, Class1.class:

Public ccll As New Class1[]


Public Sub Main()

 Dim cl1, cl2, cl3 As New Class1
 
 With cl1
   .b = 11
   .sh = 111
 End With
 
 ccll.Push(cl1)
   
 With cl2
   .b = 22
   .sh = 222
 End With
 
 ccll.Push(cl2)
 
 Print ccll[1].sh + cl3.provavettore(ccll[0].b)

End