[VB6] Gestione degli array

[xegallo]

io avrei la necessita di sapere se un array dinamico è stato ridimensionato

ad esempio il mio array
dim a() as integer

non lo posso ancora usare finchè non gli do una dimensione, almeno la massima

facendo un ubound(a) mi da errore perchè effettivamente non ne conosce i limiti

il mio quesito è come faccio a sapere se un array è stato dichiarato e ha il suo spazio in memoria ma non ha ancora dei limiti definiti senza la gestione dell'errore?

[DeBe99]

potresti farti una funzione che verifica se cè un errore usando ubound:

Public Function IsValidArray(arr As Variant) As Boolean
On Error GoTo Erro
Dim i As Integer
i = UBound(arr)
IsValidArray = True
Exit Function
Erro:
IsValidArray = False
End Function

...

dim arr() as String
...
if not IsValidArray(arr) then
   msgbox "Array non ancora creato"
   ...
endif
...

:metallica

[xegallo]

e io avevo specificato senza gestione dell'errore

[DeBe99]

Originariamente inviato da xegallo
e io avevo specificato senza gestione dell'errore

Però cosi la gestione dell'errore la implementi una volta sola nella fiunzione, poi usi solo isValidArray([array]). Senza gestione dell'errore non credo sia possibile, tutti i possibili controlli (isArray, isEmpty...) ritornano lo stesso valore che non sia dimensionato o meno...

[xegallo]

Originariamente inviato da DeBe99
Però cosi la gestione dell'errore la implementi una volta sola nella fiunzione, poi usi solo isValidArray([array]). Senza gestione dell'errore non credo sia possibile, tutti i possibili controlli (isArray, isEmpty...) ritornano lo stesso valore che non sia dimensionato o meno...

ho trovato è complicato ma ho trovato

[DeBe99]

Originariamente inviato da xegallo
ho trovato è complicato ma ho trovato

giusto per curiusità come lo hai fatto?

[xegallo]

Originariamente inviato da DeBe99
giusto per curiusità come lo hai fatto?

copymemory e struttura safearray