By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
445,885 Members | 1,445 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 445,885 IT Pros & Developers. It's quick & easy.

Help with sorting an Arraylist that contains Structures

P: n/a
Ok, I give up. I can't seem to construct a decent (productive) way of
sorting my arraylist.

I have a structure of two elements:

Structure TabStructure
Dim TabName As String
Dim FullFilePath As String
End Structure

Then for example I:

Dim tab as New TabStructure

some code

Then I add "tab" to an arraylist.

At some point I loop through my arraylist, grab data and create tabs from
it. Of course the resulting list of tabs are out of sequence.

Can someone help me to sort my array list alphabetically by
TabStructure.TabName?

I would greatly appreciate it.

Aug 21 '08 #1
Share this Question
Share on Google+
12 Replies


P: n/a
Justin,

One option is to have your structure implement the IComparable interface:

Structure TabStructure
Implements IComparable(Of TabStructure)
Dim TabName As String
Dim FullFilePath As String

Function CompareTo(ByVal other As TabStructure) As Integer
Implements IComparable(Of TabStructure).CompareTo

Return Me.TabName.CompareTo(other.TabName)

End Function

End Structure

Now ArrayList.Sort should sort the "tabs" by TabName.

By the way, I would use a class instead of a structure.

Kerry Moorman

"Justin" wrote:
Ok, I give up. I can't seem to construct a decent (productive) way of
sorting my arraylist.

I have a structure of two elements:

Structure TabStructure
Dim TabName As String
Dim FullFilePath As String
End Structure

Then for example I:

Dim tab as New TabStructure

some code

Then I add "tab" to an arraylist.

At some point I loop through my arraylist, grab data and create tabs from
it. Of course the resulting list of tabs are out of sequence.

Can someone help me to sort my array list alphabetically by
TabStructure.TabName?

I would greatly appreciate it.

Aug 22 '08 #2

P: n/a
Hi Justin,

First, why are you using ArrayList ? You should use the generic List, eg.

Dim myList as New List(Of TabStructure)

Then, assuming you are using VB 2008, you can pass in a lambda function to
the sort method:

myList.Sort(Function(x, y) x.TabName.CompareTo(y.TabName))



"Justin" <No**@None.comwrote in message
news:OE****************@TK2MSFTNGP03.phx.gbl...
Ok, I give up. I can't seem to construct a decent (productive) way of
sorting my arraylist.

I have a structure of two elements:

Structure TabStructure
Dim TabName As String
Dim FullFilePath As String
End Structure

Then for example I:

Dim tab as New TabStructure

some code

Then I add "tab" to an arraylist.

At some point I loop through my arraylist, grab data and create tabs from
it. Of course the resulting list of tabs are out of sequence.

Can someone help me to sort my array list alphabetically by
TabStructure.TabName?

I would greatly appreciate it.
Aug 22 '08 #3

P: n/a
First, until just now I never heard of "lists". However you mention VS2008
specifically and while I am using VS2008 I'm wanting to stay with in the
confines of framework 2. Does your suggestion do that? If so then I'll
read up on it.

Googling "VB.NET list" came up with nothing but arraylists and listboxes.

I already know arraylists and I already know how to check for dups before
adding so it was pretty simple to bang out the code. This arraylist is used
all over my app.

"Bill McCarthy" <Bi**@localhost.comwrote in message
news:12**********************************@microsof t.com...
Hi Justin,

First, why are you using ArrayList ? You should use the generic List, eg.

Dim myList as New List(Of TabStructure)

Then, assuming you are using VB 2008, you can pass in a lambda function to
the sort method:

myList.Sort(Function(x, y) x.TabName.CompareTo(y.TabName))



"Justin" <No**@None.comwrote in message
news:OE****************@TK2MSFTNGP03.phx.gbl...
>Ok, I give up. I can't seem to construct a decent (productive) way of
sorting my arraylist.

I have a structure of two elements:

Structure TabStructure
Dim TabName As String
Dim FullFilePath As String
End Structure

Then for example I:

Dim tab as New TabStructure

some code

Then I add "tab" to an arraylist.

At some point I loop through my arraylist, grab data and create tabs from
it. Of course the resulting list of tabs are out of sequence.

Can someone help me to sort my array list alphabetically by
TabStructure.TabName?

I would greatly appreciate it.
Aug 22 '08 #4

P: n/a
Eh, this is my only instance and it was just 4 lines of code. I was
wondering how to implement IComparable. Now I get it. This make much more
sense then what I was reading earlier today.

Thanks! I'll play with this tomorrow.
"Kerry Moorman" <Ke**********@discussions.microsoft.comwrote in message
news:36**********************************@microsof t.com...
Justin,

One option is to have your structure implement the IComparable interface:

Structure TabStructure
Implements IComparable(Of TabStructure)
Dim TabName As String
Dim FullFilePath As String

Function CompareTo(ByVal other As TabStructure) As Integer
Implements IComparable(Of TabStructure).CompareTo

Return Me.TabName.CompareTo(other.TabName)

End Function

End Structure

Now ArrayList.Sort should sort the "tabs" by TabName.

By the way, I would use a class instead of a structure.

Kerry Moorman

"Justin" wrote:
>Ok, I give up. I can't seem to construct a decent (productive) way of
sorting my arraylist.

I have a structure of two elements:

Structure TabStructure
Dim TabName As String
Dim FullFilePath As String
End Structure

Then for example I:

Dim tab as New TabStructure

some code

Then I add "tab" to an arraylist.

At some point I loop through my arraylist, grab data and create tabs from
it. Of course the resulting list of tabs are out of sequence.

Can someone help me to sort my array list alphabetically by
TabStructure.TabName?

I would greatly appreciate it.

Aug 22 '08 #5

P: n/a
The generic List(Of T) is in 2.0. Its advantage over ArrayList is
that the contents of the list is typed so you don't have to cast the
contents and therefore avoid runtime errors if you make a mistake
casting the contents. I also strongly urge you to use it instead of
ArrayList.

On Thu, 21 Aug 2008 20:48:26 -0700, "Justin" <No**@None.comwrote:
>First, until just now I never heard of "lists". However you mention VS2008
specifically and while I am using VS2008 I'm wanting to stay with in the
confines of framework 2. Does your suggestion do that? If so then I'll
read up on it.

Googling "VB.NET list" came up with nothing but arraylists and listboxes.

I already know arraylists and I already know how to check for dups before
adding so it was pretty simple to bang out the code. This arraylist is used
all over my app.

"Bill McCarthy" <Bi**@localhost.comwrote in message
news:12**********************************@microso ft.com...
>Hi Justin,

First, why are you using ArrayList ? You should use the generic List, eg.

Dim myList as New List(Of TabStructure)

Then, assuming you are using VB 2008, you can pass in a lambda function to
the sort method:

myList.Sort(Function(x, y) x.TabName.CompareTo(y.TabName))



"Justin" <No**@None.comwrote in message
news:OE****************@TK2MSFTNGP03.phx.gbl...
>>Ok, I give up. I can't seem to construct a decent (productive) way of
sorting my arraylist.

I have a structure of two elements:

Structure TabStructure
Dim TabName As String
Dim FullFilePath As String
End Structure

Then for example I:

Dim tab as New TabStructure

some code

Then I add "tab" to an arraylist.

At some point I loop through my arraylist, grab data and create tabs from
it. Of course the resulting list of tabs are out of sequence.

Can someone help me to sort my array list alphabetically by
TabStructure.TabName?

I would greatly appreciate it.
Aug 22 '08 #6

P: n/a
Cool, I'll check it out. Thanks.
"Jack Jackson" <jj******@cinnovations.netwrote in message
news:c0********************************@4ax.com...
The generic List(Of T) is in 2.0. Its advantage over ArrayList is
that the contents of the list is typed so you don't have to cast the
contents and therefore avoid runtime errors if you make a mistake
casting the contents. I also strongly urge you to use it instead of
ArrayList.

On Thu, 21 Aug 2008 20:48:26 -0700, "Justin" <No**@None.comwrote:
>>First, until just now I never heard of "lists". However you mention
VS2008
specifically and while I am using VS2008 I'm wanting to stay with in the
confines of framework 2. Does your suggestion do that? If so then I'll
read up on it.

Googling "VB.NET list" came up with nothing but arraylists and listboxes.

I already know arraylists and I already know how to check for dups before
adding so it was pretty simple to bang out the code. This arraylist is
used
all over my app.

"Bill McCarthy" <Bi**@localhost.comwrote in message
news:12**********************************@micros oft.com...
>>Hi Justin,

First, why are you using ArrayList ? You should use the generic List,
eg.

Dim myList as New List(Of TabStructure)

Then, assuming you are using VB 2008, you can pass in a lambda function
to
the sort method:

myList.Sort(Function(x, y) x.TabName.CompareTo(y.TabName))



"Justin" <No**@None.comwrote in message
news:OE****************@TK2MSFTNGP03.phx.gbl.. .
Ok, I give up. I can't seem to construct a decent (productive) way of
sorting my arraylist.

I have a structure of two elements:

Structure TabStructure
Dim TabName As String
Dim FullFilePath As String
End Structure

Then for example I:

Dim tab as New TabStructure

some code

Then I add "tab" to an arraylist.

At some point I loop through my arraylist, grab data and create tabs
from
it. Of course the resulting list of tabs are out of sequence.

Can someone help me to sort my array list alphabetically by
TabStructure.TabName?

I would greatly appreciate it.
Aug 22 '08 #7

P: n/a
Hi Justin,

List(Of T) basically replaces ArrayList as of .NET 2.0//VB 2005. It uses
generics, so the item type is strongly typed. With value types, such as your
structure, this avoids costly boxing and unboxing the arraylist has to
perform. So you get more robust code and in many cases a bit of a
performance improvement too.

As to compiling against the 2.0 framework, in VB 2008 in project options,
compile tab, select Advanced Compile Options and set the target framework to
2.0, 3.0 or 3.5. If you are using features not supported by the target
framework, VB will warn you. The example of the lambda function I gave
should compile to 2.0 without problem. The lambda function, is basically an
inline function.

As to generics, it's been a while since I wrote much about them, but perhaps
this old article may help introduce you to them:
http://visualstudiomagazine.com/feat...torialsid=1731

"Justin" <No**@None.comwrote in message
news:O$**************@TK2MSFTNGP03.phx.gbl...
First, until just now I never heard of "lists". However you mention
VS2008 specifically and while I am using VS2008 I'm wanting to stay with
in the confines of framework 2. Does your suggestion do that? If so then
I'll read up on it.

Googling "VB.NET list" came up with nothing but arraylists and listboxes.

I already know arraylists and I already know how to check for dups before
adding so it was pretty simple to bang out the code. This arraylist is
used all over my app.

"Bill McCarthy" <Bi**@localhost.comwrote in message
news:12**********************************@microsof t.com...
>Hi Justin,

First, why are you using ArrayList ? You should use the generic List,
eg.

Dim myList as New List(Of TabStructure)

Then, assuming you are using VB 2008, you can pass in a lambda function
to the sort method:

myList.Sort(Function(x, y) x.TabName.CompareTo(y.TabName))



"Justin" <No**@None.comwrote in message
news:OE****************@TK2MSFTNGP03.phx.gbl...
>>Ok, I give up. I can't seem to construct a decent (productive) way of
sorting my arraylist.

I have a structure of two elements:

Structure TabStructure
Dim TabName As String
Dim FullFilePath As String
End Structure

Then for example I:

Dim tab as New TabStructure

some code

Then I add "tab" to an arraylist.

At some point I loop through my arraylist, grab data and create tabs
from it. Of course the resulting list of tabs are out of sequence.

Can someone help me to sort my array list alphabetically by
TabStructure.TabName?

I would greatly appreciate it.
Aug 22 '08 #8

P: n/a
On 2008-08-21, Justin <No**@None.comwrote:
Ok, I give up. I can't seem to construct a decent (productive) way of
sorting my arraylist.

I have a structure of two elements:

Structure TabStructure
Dim TabName As String
Dim FullFilePath As String
End Structure

Then for example I:

Dim tab as New TabStructure

some code

Then I add "tab" to an arraylist.

At some point I loop through my arraylist, grab data and create tabs from
it. Of course the resulting list of tabs are out of sequence.

Can someone help me to sort my array list alphabetically by
TabStructure.TabName?

I would greatly appreciate it.
Others have point out to you the List(Of T) - so I won't rehash that :) But,
I'm going to talk about your structure. The fact is, there is almost never
any reason to use a structure except for interop scenarios or where you want
to preserve value symantics... TabStructure should be a class. This will
become apparent as soon as you start trying to modify individual members of
your list:

Private Structure TStruct
Public s1 As String
Public s2 As String

Public Sub New(ByVal s1 As String, ByVal s2 As String)
Me.s1 = s1
Me.s2 = s2
End Sub
End Structure

Sub Main()
Dim l As New List(Of TStruct)
l.Add(New TStruct("one", "one"))
l.Add(New TStruct("two", "one"))
l.Add(New TStruct("three", "one"))
l.Add(New TStruct("four", "one"))

For Each i As TStruct In l
i.s2 = "changing..."
Next

For Each i As TStruct In l
Console.WriteLine("s1={0}, s2={1}", i.s1, i.s2)
Next
End Sub

You might be suprised that the values of s2 changend in the first loop, don't
actually change anything. That's because TStruct is a value type, and any
time you assign or return it you get a copy and not the original. If I change
TStruct to a class:

Private Class TStruct
Public s1 As String
Public s2 As String

Public Sub New(ByVal s1 As String, ByVal s2 As String)
Me.s1 = s1
Me.s2 = s2
End Sub
End Class

Then every thing works as expected.

So, again unless your doing interop or really want value symantics, there is
not much gained by using a struct over a class.

--
Tom Shelton
Aug 22 '08 #9

P: n/a
Ok, after getting beat in the head with "class" by 4 people I converted it
to a class :)

I tried to convert my arraylist to a list and that was just an ugly mess.
Here's the first two errors I received:
'TabsArray' cannot expose type 'TabClass' outside the project through class
'frmMain'
Too few type arguments to 'System.Collections.Generic.List(Of T)'

But enough of that. I want to wrap my head around iComparable first. I'll
deal with that later.

I implemented iComparable and now when I try to .sort my arraylist I get:

"Failed to compare two elements in the array."

Again, thanks for the help everyone!


"Kerry Moorman" <Ke**********@discussions.microsoft.comwrote in message
news:36**********************************@microsof t.com...
Justin,

One option is to have your structure implement the IComparable interface:

Structure TabStructure
Implements IComparable(Of TabStructure)
Dim TabName As String
Dim FullFilePath As String

Function CompareTo(ByVal other As TabStructure) As Integer
Implements IComparable(Of TabStructure).CompareTo

Return Me.TabName.CompareTo(other.TabName)

End Function

End Structure

Now ArrayList.Sort should sort the "tabs" by TabName.

By the way, I would use a class instead of a structure.

Kerry Moorman

"Justin" wrote:
>Ok, I give up. I can't seem to construct a decent (productive) way of
sorting my arraylist.

I have a structure of two elements:

Structure TabStructure
Dim TabName As String
Dim FullFilePath As String
End Structure

Then for example I:

Dim tab as New TabStructure

some code

Then I add "tab" to an arraylist.

At some point I loop through my arraylist, grab data and create tabs from
it. Of course the resulting list of tabs are out of sequence.

Can someone help me to sort my array list alphabetically by
TabStructure.TabName?

I would greatly appreciate it.

Aug 22 '08 #10

P: n/a
On 2008-08-22, Justin <No**@None.comwrote:
Ok, after getting beat in the head with "class" by 4 people I converted it
to a class :)

I tried to convert my arraylist to a list and that was just an ugly mess.
Here's the first two errors I received:
'TabsArray' cannot expose type 'TabClass' outside the project through class
'frmMain'
Too few type arguments to 'System.Collections.Generic.List(Of T)'

But enough of that. I want to wrap my head around iComparable first. I'll
deal with that later.

I implemented iComparable and now when I try to .sort my arraylist I get:

"Failed to compare two elements in the array."

Again, thanks for the help everyone!
Using a list should be simply:

Dim myList As New List(Of TabClass)()

from there, it is very much like an ArrayList - only better and faster :)

--
Tom Shelton
Aug 22 '08 #11

P: n/a
I've come across this before. When something as simple as this just isn't
working I've learned to start a whole new project and bring everything over.
Surprisingly that didn't take too long.

The error, "Failed to compare two elements in the array.", came over however
once I converted the arraylist to a list the error went away and it's now
sorting properly. Obviously the List errors did not come over as well.

I'm growing a little tired of having to start whole new projects because of
silly unexplained issues but at the same time I'm glad to be able to move
forward.

Again, thanks to everyone!
"Tom Shelton" <to*********@comcastXXXXXXX.netwrote in message
news:3I******************************@comcast.com. ..
On 2008-08-22, Justin <No**@None.comwrote:
>Ok, after getting beat in the head with "class" by 4 people I converted
it
to a class :)

I tried to convert my arraylist to a list and that was just an ugly mess.
Here's the first two errors I received:
'TabsArray' cannot expose type 'TabClass' outside the project through
class
'frmMain'
Too few type arguments to 'System.Collections.Generic.List(Of T)'

But enough of that. I want to wrap my head around iComparable first.
I'll
deal with that later.

I implemented iComparable and now when I try to .sort my arraylist I get:

"Failed to compare two elements in the array."

Again, thanks for the help everyone!

Using a list should be simply:

Dim myList As New List(Of TabClass)()

from there, it is very much like an ArrayList - only better and faster :)

--
Tom Shelton
Aug 22 '08 #12

P: n/a
Point well taken. While my data doesn't change so this wont hurt me here, I
never knew this about structures and I'll be sure to just use classes from
now on.

Thanks!
"Tom Shelton" <to*********@comcastXXXXXXX.netwrote in message
news:cM******************************@comcast.com. ..
On 2008-08-21, Justin <No**@None.comwrote:
>Ok, I give up. I can't seem to construct a decent (productive) way of
sorting my arraylist.

I have a structure of two elements:

Structure TabStructure
Dim TabName As String
Dim FullFilePath As String
End Structure

Then for example I:

Dim tab as New TabStructure

some code

Then I add "tab" to an arraylist.

At some point I loop through my arraylist, grab data and create tabs from
it. Of course the resulting list of tabs are out of sequence.

Can someone help me to sort my array list alphabetically by
TabStructure.TabName?

I would greatly appreciate it.

Others have point out to you the List(Of T) - so I won't rehash that :)
But,
I'm going to talk about your structure. The fact is, there is almost
never
any reason to use a structure except for interop scenarios or where you
want
to preserve value symantics... TabStructure should be a class. This will
become apparent as soon as you start trying to modify individual members
of
your list:

Private Structure TStruct
Public s1 As String
Public s2 As String

Public Sub New(ByVal s1 As String, ByVal s2 As String)
Me.s1 = s1
Me.s2 = s2
End Sub
End Structure

Sub Main()
Dim l As New List(Of TStruct)
l.Add(New TStruct("one", "one"))
l.Add(New TStruct("two", "one"))
l.Add(New TStruct("three", "one"))
l.Add(New TStruct("four", "one"))

For Each i As TStruct In l
i.s2 = "changing..."
Next

For Each i As TStruct In l
Console.WriteLine("s1={0}, s2={1}", i.s1, i.s2)
Next
End Sub

You might be suprised that the values of s2 changend in the first loop,
don't
actually change anything. That's because TStruct is a value type, and any
time you assign or return it you get a copy and not the original. If I
change
TStruct to a class:

Private Class TStruct
Public s1 As String
Public s2 As String

Public Sub New(ByVal s1 As String, ByVal s2 As String)
Me.s1 = s1
Me.s2 = s2
End Sub
End Class

Then every thing works as expected.

So, again unless your doing interop or really want value symantics, there
is
not much gained by using a struct over a class.

--
Tom Shelton
Aug 23 '08 #13

This discussion thread is closed

Replies have been disabled for this discussion.