Velocity Reviews (http://www.velocityreviews.com/forums/index.php)
-   ASP General (http://www.velocityreviews.com/forums/f65-asp-general.html)
-   -   Array puzzle (http://www.velocityreviews.com/forums/t797240-array-puzzle.html)

 Lasse Edsvik 12-03-2004 02:51 PM

Array puzzle

Hello

I was wondering if you guys could help me solve this one:

I have an array that looks like this:

a(1) = "A"
a(2) = "B"
a(3) = "C"
a(4) = "D"
a(5) = "E"

And i would like to "switch" positions, i.e move A to a(4) like this:

a(1) = "B"
a(2) = "C"
a(3) = "D"
a(4) = "A"
a(5) = "E"

is that possible to do? moving values around?

/Lasse

 Gérard Leclercq 12-03-2004 02:56 PM

Re: Array puzzle

tmp=a(4)
a(4)=a(1)
a(1)=tmp

 Gérard Leclercq 12-03-2004 03:00 PM

Re: Array puzzle

if you want to pick a number randomly see RANDOMIZE

lets say the nr = 4

tmp=a(1)

For x = 1 to nr-1
a(x)=a(x+1)
Next

a(nr)=tmp

or something like that NOT TESTED

 Ray Costanzo [MVP] 12-03-2004 03:04 PM

Re: Array puzzle

You'd have to create a copy of the array and then rewrite the values as you
like. I don't really see a pattern to how you want the values changed, so
if they're just arbitrary changes, code could look like this:

(Note that arrays or 0-based in VB Script)

Dim a()
ReDim a(4)
Dim b ''variant, and no ()
a(0) = "A"
a(1) = "B"
a(2) = "C"
a(3) = "D"
a(4) = "E"

b = a
b(0) = a(1)
b(1) = a(2)
b(2) = a(3)
b(3) = a(0)
b(4) = a(4)

a = b

For i = 0 To UBound(a)
Response.Write a(i) & "<br>"
Next

Ray at work

"Lasse Edsvik" <lasse@nospam.com> wrote in message
news:%23xWuVdU2EHA.2624@TK2MSFTNGP11.phx.gbl...
> Hello
>
> I was wondering if you guys could help me solve this one:
>
>
> I have an array that looks like this:
>
>
> a(1) = "A"
> a(2) = "B"
> a(3) = "C"
> a(4) = "D"
> a(5) = "E"
>
> And i would like to "switch" positions, i.e move A to a(4) like this:
>
> a(1) = "B"
> a(2) = "C"
> a(3) = "D"
> a(4) = "A"
> a(5) = "E"
>
> is that possible to do? moving values around?
>
> /Lasse
>
>

 All times are GMT. The time now is 09:01 PM.