VB多态构造函数默认值和属性。类似Listbox的类别

Question

我一直在撞墙的时候撞到墙上。 我试图创建一个类来存储数据与另一个类的人存储他们的银行交易。

理想情况下，这一切都隐藏起来，只留下程序员可用的简单陈述，声明和功能。这些措施包括：

• Dim Clients As New ClientList
• Clients.Count 'readonly integer
• Clients.Add("S")
• Clients.Refresh()
• Clients(n).Remove()
• Clients(n).Transaction.Add()
• Clients(n).Transaction(n).Remove()

我知道这是可能的，因为这些存在于Listbox类中，但无法弄清楚它是如何完成的。

任何帮助，将不胜感激。 在此先感谢！

Answer 1

创建Transaction和Client类

Public Class Transaction 
    'TODO: Implement Transaction 
End Class 

Public Class Client 
    Public ReadOnly Transactions As List(Of Transaction) = New List(Of Transaction) 

    Public Sub New(ByVal name As String) 
     Me.Name = name 
    End Sub 

    Public Name As String 
End Class 

创建ClientList类

Public Class ClientList 
    Inherits List(Of Client) 

    Public Overloads Sub Add(ByVal name As String) 
     Add(New Client(name)) 
    End Sub 

    Public Sub Refresh() 
     ' Do what ever you want Refresh to do 
    End Sub 
End Class 

然后可以使用客户端列表这样

Dim clients As New ClientList 

clients.Add("S") 
' Or 
clients.Add(New Client("T")) 

Dim n As Integer = clients.Count 
Dim m As Integer = clients(0).Transactions.Count 

clients.Refresh() 
clients.RemoveAt(5) 
clients(n - 1).Transactions.Add(New Transaction()) 
clients(n - 1).Transactions.RemoveAt(2) 
Dim name As String = clients(0).Name 
Dim client As Client = clients(0) 

Answer 2

使用通用List(Of T) class，专门用于容纳您的Client对象。它已经提供了所有您想要的方法，而无需编写一行代码！

所以，你会先写有关“客户”一个Client类包含所有属性（数据）和方法（行动）的：

Public Class Client 

    Public Property Name As String 

    Public Property AmountOwned As Decimal 

    Public Sub Bill() 
     BillingManager.BillClient(Me) 
    End Sub 

    ' ... etc. 

End Class 

然后，你会创建List(Of T)容纳所有您的Client类的实例：

Dim clients As New System.Collections.Generic.List(Of Client) 

如果出于某种原因，你需要专门的Add，行为等方法提供的集合类，或添加其他方法，您需要稍微改变策略。 Instead of using List(Of T)，你会从Collection(Of T)继承并创建一个自定义集合类，像这样：

Public Class ClientCollection 
    Inherits System.Collections.ObjectModel.Collection(Of T) 

    ' ... customize as desired ... 

End Class 

的WinForms的ListBox类不这样做完全一样，因为之前仿制药被引入到框架它被写。但是，既然他们现在在这里，并且您应该尽可能使用它们，您完全可以忽略WinForms如何执行操作。