array.reverse

[Wilfredo]

I have 25 numbers coming up from 1 to 25, now I want it to
go from 25 to 1 with array.reverse. I get a reverse is not
a member of array. Help

[José Manuel Agüero]

Hello, Wilfredo:

You have a sample of how to do that in http://msdn.microsoft.com/library/de...ssorttopic.asp.

Regards.
"Wilfredo" <an*******@discussions.microsoft.com> escribió en el mensaje news:00****************************@phx.gbl...
| I have 25 numbers coming up from 1 to 25, now I want it to
| go from 25 to 1 with array.reverse. I get a reverse is not
| a member of array. Help

[One Handed Man]

This works just fine;-

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click

Dim myArray() As String = {"hello", "My", "Friend"}

Dim i As Integer
'Prints forward
For i = 0 To myArray.Length - 1

Debug.WriteLine(myArray(i))

' Next reverse array
myArray.Reverse(myArray)

'Prints reverse of original order using same loop as before
For i = 0 To myArray.Length - 1

Debug.WriteLine(myArray(i))

Next

End Sub

'========================================

Wilfredo wrote:

I have 25 numbers coming up from 1 to 25, now I want it to
go from 25 to 1 with array.reverse. I get a reverse is not
a member of array. Help

[Herfried K. Wagner [MVP]]

* "Wilfredo" <an*******@discussions.microsoft.com> scripsit:

I have 25 numbers coming up from 1 to 25, now I want it to
go from 25 to 1 with array.reverse. I get a reverse is not
a member of array.

Sample taken from the MSDN documentation:

\\\
Imports System
Imports Microsoft.VisualBasic

Public Class SamplesArray

Public Shared Sub Main()

' Creates and initializes a new Array.
Dim myArray As Array = Array.CreateInstance(GetType(String), 9)
myArray.SetValue("The", 0)
myArray.SetValue("QUICK", 1)
myArray.SetValue("BROWN", 2)
myArray.SetValue("FOX", 3)
myArray.SetValue("jumped", 4)
myArray.SetValue("over", 5)
myArray.SetValue("the", 6)
myArray.SetValue("lazy", 7)
myArray.SetValue("dog", 8)

' Displays the values of the Array.
Console.WriteLine("The Array initially contains the " _
+ "following values:")
PrintIndexAndValues(myArray)

' Reverses the sort of the values of the Array.
Array.Reverse(myArray, 1, 3)

' Displays the values of the Array.
Console.WriteLine("After reversing:")
PrintIndexAndValues(myArray)
End Sub
Public Shared Sub PrintIndexAndValues(myArray As Array)
Dim i As Integer
For i = myArray.GetLowerBound(0) To myArray.GetUpperBound(0)
Console.WriteLine(ControlChars.Tab + "[{0}]:" + ControlChars.Tab _
+ "{1}", i, myArray.GetValue(i))
Next i
End Sub
End Class

' This code produces the following output.
'
' The Array initially contains the following values:
' [0]: The
' [1]: QUICK
' [2]: BROWN
' [3]: FOX
' [4]: jumped
' [5]: over
' [6]: the
' [7]: lazy
' [8]: dog
' After reversing:
' [0]: The
' [1]: FOX
' [2]: BROWN
' [3]: QUICK
' [4]: jumped
' [5]: over
' [6]: the
' [7]: lazy
' [8]: dog
///

--
Herfried K. Wagner [MVP]
<http://www.mvps.org/dotnet>