Tank You, but I don't like managente Error On Error. I can chek the memory
pointer?.
"John Doe" <john@doe.com> ha scritto nel messaggio
news:arin1t$n3g$1@news.net.uni-c.dk...
> A dirty "hack" is to make a function which tests the array
>
> if not dim - then return -1
>
> like this
>
> Option Explicit
>
> Private Sub Form_Load()
>
> Dim arr() As Long
> 'ReDim Preserve arr(10)
> MsgBox TestArray(arr)
>
> End Sub
>
> Function TestArray(vArr() As Long) As Integer
>
> Dim i As Integer
>
> On Error Resume Next ' turn off errorchecking
> i = UBound(vArr)
> If Err <> 0 Then 'Array is not dim
> i = -1
> Err.Clear ' clean up
> End If
> On Error GoTo 0 'turn on normal errorchecking
> TestArray = i
>
> End Function
>
>
>
> "pippo" <pippo@iol.it> wrote in message
> news:KXJC9.42856$Yw.2017031@news2.tin.it...
> > I.E. How I chek if array dinamic is located.
> >
> > DIM arr() Long
> > if (Ubound(arr)) then '<<<< Error. Ho not is dimensionate with REDIM
> >
> > -------------------------------------------------
> > At me not LIKE the management Errors (On Error ) of VB.
> > -------------------------------------------------
> >
> > Alfonso.
> >
> >
> >
>
>