Array...questo sconosciuto

[BOYROMA1]

Salve a tutti...
Questa funzione dovrebbe restituirmi il prodotto fra prezzo e quantita dell'articolo selezionato.
Però non mi vede l'array e mi dice che restituisce null.
Penso che dovrei inizializzare l'array con il numero di elementi ma io non lo conosco e quindi come faccio?

dim y as integer = 0
dim somma() as double
function subtotale() as string
somma(y) = cdbl(ds.tables("tblAcquisti").Rows(y)("prezzo").to string) * cint(ds.tables("tblAcquisti").Rows(y)("quantita"). tostring)
subtotale = cstr(somma(y))
y = y + 1
end function

[rafpas]

se usi il Codebehind la funzione deve essere public

[zampa28]

Ma questa funzione la richiami all'interno di un ciclo(Tipo For o while)?

Cmq per ridimensionare un array Basta usare la funzione Redim con la clausola Preserve(Che tiene in memoria i dati inseriri). Es:

Dim MyArr() as String
Dim i as Integer

For i = 0 to 10
   MyArr(i) = "Valore" & i
   Redim Preserve MyArr(i + 1)
   i += 1
Next i