[VB6] Funzione che ritorna un array

[wastzzz]

in Visual Basic 6 non riesco a creare una funzione che mi ritorni un array (facciamo un array di integer), qualcuno sa se esistono sintassi particolari per farlo?

Grazie
Max

[oregon]

Function Func() As Integer()

[wastzzz]

Ok facciamo un esempio alquanto semplice

Private Sub blabla()
dim vettore(9) as integer
vettore() = funzionebanale (9) 'che dubito si assegni cosi
End Sub

Function funzionebanale(a) As Integer()
Dim vettore(9) as integer

For i = 0 To a
vettore(i) = a
Next i

funzionebanale() = vettore() 'che dubito si assegni cosi
End Function

ora mi serve la sintassi giusta per le 2 assegnazioni commentate.. Grazie ^^

[oregon]

In neretto le righe modificate o aggiunte

Originariamente inviato da wastzzz

Private Sub blabla()
  Dim vettore() As Integer
  vettore = funzionebanale(9)
End Sub

Function funzionebanale(a) As Integer()
  Dim i As Integer
  Dim vettore(9) as integer

  For i = 0 To a
      vettore(i) = a
  Next i

  funzionebanale = vettore
End Function

Grazie ^^

Prego

[wastzzz]

Grazie amico =)