VB.NET need a class property to be a list array

altariamx2003
altariamx2003 used Ask the Experts™
on
this post is just because I like to learn

a few minutes ago I found this problem on internet: http://stackoverflow.com/questions/1564318/vb-net-need-a-class-property-to-be-a-list-array

I check the example but the class has problems I tried to solve them

this is the class:
Public Class Item
    Private _itemno As String
    Public Property ItemNo() As String
        Get
            Return _itemno
        End Get
        Set(ByVal value As String)
            _itemno = value
        End Set
    End Property

End Class


Public Class Accessory
    Private _items As List(Of Item)
    Public Property Items() As List(Of Item)
        Get
            Return _items
        End Get
        Set(ByVal value As List(Of Item))
            _items = value
        End Set
    End Property

    Public Sub New()
        _items = New List(Of Item)
    End Sub

End Class

Public Class MasterItem
    Private _item As Item
    Public Property PrimaryItem() As Item
        Get
            Return _item
        End Get
        Set(ByVal value As Item)
            _item = value
        End Set
    End Property


    Private _accessories As Accessory
    Public Property Accessories() As Accessory
        Get
            Return _accessories
        End Get
        Set(ByVal value As Accessory)
            _accessories = value
        End Set
    End Property
End Class

Open in new window



When I tried to use it:
 example
It show me the following error:
"Too many arguments for Public sub new()"
Comment
Watch Question

Do more with

Expert Office
EXPERT OFFICE® is a registered trademark of EXPERTS EXCHANGE®
You need to specify a New() function that allows for an argument to be supplied. It would have an identity like this:

Public Sub New(ByVal ItemNo As String)

Author

Commented:
ok

it works

thanks bro

Do more with

Expert Office
Submit tech questions to Ask the Experts™ at any time to receive solutions, advice, and new ideas from leading industry professionals.

Start 7-Day Free Trial