🚀 go-pugleaf

It appears you are trying to ReDim the first dimension of the array.  If you 
check HELP for the ReDim statement, you will find only the last dimension can 
be ReDimmed.

Lee Weiner
lee DOT weiner AT home DOT com

In article <9po9gh$qjs$1@ctb-nnrp1.saix.net>, "sou|burn" <ralfvb@msn.com> 
wrote:
>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
>
>