vb script for reverse of an array?

[dipashri]

How to write a vb script for reverse of an array(reversing an array)?

[supputuri]

below is the snippet which will give you the basic idea.

Code:

a = Array("a","b","c") i = 0 For x = ubound(a) to 0 Step-1 ReDim preserve b(i) b(i) = a(x) i= i+1 Next msgbox "your array items" & join(a) msgbox "Reservese items" &join(b)

did not following the coding standards... it's a raw code.

[pranikgarg]

Hi,

Here is one more method:

Code:

Sub Reverse( ByRef myArray ) Dim i, ArrCount , HalfArrCount , strHolder ArrCount = UBound(a) HalfArrCount = Int(ArrCount/2) For i = 0 to HalfArrCount Step 1 strHolder= a(i) a(i) = a(ArrCount-1) a(ArrCount-1) = strHolder Next End Sub

Try this...