🚀 go-pugleaf

You can only change the size of the last dimension of the array. Just swap
them about and you will then be able to do:

ReDim Preserve EXP(4, EXP_Max) As String

Mike


"sou|burn" <ralfvb@msn.com> wrote in message
news:9po9gh$qjs$1@ctb-nnrp1.saix.net...
> Hi there
>
> I'm having trouble with the following code
>
>
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
> ::::::::::::::::::::::::::::::::::::::::::::::::::
> Public EXP()
> EXP_Max as integer
> v2 is a integer (always stays smaller than EXP_Max)
> sTag is a string
>
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
> ::::::::::::::::::::::::::::::::::::::::::::::::::
> Select Case Left$(sTag, 3)
>     Case "ENG"
>         ReDim Preserve EXP(EXP_Max, 4) As String
>         EXP_Max = EXP_Max + 1
>         EX(v2, 0) = sTag
> End Select
>
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
> ::::::::::::::::::::::::::::::::::::::::::::::::::
>
> I get an "subscript out of range" error on the ReDim line as soon as
EXP_Max
> = 2, meaning there are values in the array that needs 2 b "preserved"
>
> any help would be very much appreciated
>
> sou|burn
>
>