What data type to use?

[Norkis]

Hey,

I want to creat such items collection (like table):

On item consist such data:

Name (String), Type (String), Validation (String), Order (Integer), Emails (Elements list, array os smth)

What data types to uses, how to write such collection?

Thanx

[mendhak]

Use a structure or a class.

[Norkis]

Can you give me an example?

What data type to use when storing strings list?

[Norkis]

I tried to use structure, but it is not what I need.

I need something like table:

Every item must consist Name (String), Type (String), Validation (String), Order (Integer). What data type to use and how to use it?

Emails I can store seperatly in arraylist.

[CyberHawke]

I'm sorry, but could you explain why a structure is not suitable for your needs?
If you create a structure, and then create items of that structure type, you can add the new items to an arraylist.

Perhaps I am just not understanding what you need, but based on your explanation and my experience, a structure should work perfectly.

[Norkis]

Can you give me an exampe?

There would be more then one item (row) in this array:


I need something like this to use:

dim myList as MuCustomArrayList

myList.Add(Name1, Type1, Validation1, Order1)
myList.Add(Name2, Type2, Validation2, Order2)
myList.Add(Name3, Type3, Validation3, Order3)

To read 1rs item's order:

Response.write Ctype(myList(1).Items(4).Value, Integer)

[CyberHawke]

Ok, try this:

' Declarations Section
    Public Structure myListItem
        Public Name As String
        Public Type As String
        Public Validation As String
        Public Order As Int32
    End Structure
    Private myItemsList As ArrayList = New ArrayList
 
    ' New Sub to add and get the Items, you probably want to use separate subroutines for this.
    Private Sub GetMyItemOrder()
        Dim myItem As myListItem
        Dim Items As Int32
        For Items = 0 To 4
            myItem.Name = "User" + Items.ToString
            myItem.Type = "Type" + Items.ToString
            myItem.Validation = ">0"
            myItem.Order = Items
            myItemsList.Add(myItem)
        Next
        myItem = myItemsList(1)
        Me.TextBox1.Text = myItem.Order.ToString
    End Sub

Hope this helps you.