對於機房收費系統的重構。從大的方面來看。無非就是對於數據庫的四個操作。增刪改查。而且我們用的是三層架構進行重構。D層用來和數據庫打交道。進行這四個操作就須要有返回值，增刪改在這裏不多說。可是當進行查的時候。d層須要數據給b層，那麽我們以什麽樣的形式返回最好呢？

剛開始接觸三層的時候，我返回的是datatable，就是dt.Rows[0][“xxx”]的形式，感覺實現了。就非常厲害了，後來通過與大家交流發現，事實上另一種更好用的方法。就是利用實體類填充泛型集合。

那麽問題就出來了：

1.泛型集合是什麽？
2.為什麽說用它會更好？

一、是什麽？

泛型，顧名思義就是泛泛的類型. 也就是沒有確定的類型. 那麽沒有確定類型怎麽使用呢？實際上。使用的時候規定類型即可了.

集合，就是一種處理多個數據類型的類。而且一般你會在多個應用程序中使用同一個集合的多種不同的形式。你不須要每次依據草稿建立集合，而是使用泛型建立一個泛型類原型（prototype）。

在使用的時候，依據須要處理的數據類型。將List<T>尖括號裏的T換成相應的類型，並創建相應的實例就能夠使用了.

二、為什麽？

首先。你須要給代碼加入例如以下所看到的的Imports語句：

　　加入Imports語句之後。你就能夠建立泛型類了。主要的類看起來非經常見。你能夠使用屬性、函數、子程序、字段或能夠在類中使用的其他不論什麽東西。

Public Class ConvertHelperEntity
    Public Shared Function convertToList(Of T As {New})(ByVal dt As DataTable) As IList(Of T)
        ‘將datatable 轉換成泛型集合
        Dim myList As New List(Of T)  ‘定義終於返回的集合

        Dim myType As Type = GetType(T)  ‘得到實體類的類型名
        Dim dr As DataRow  ‘定義行集

        Dim tempName As String = String.Empty  ‘定義一個暫時變量

        ‘遍歷datatable全部數據行
        For Each dr In dt.Rows


            Dim myT As New T   ‘定義一個實體類的對象
            Dim propertys() As PropertyInfo = myT.GetType.GetProperties()   ‘定義屬性集合
            Dim pr As PropertyInfo

            ‘遍歷該對象的全部屬性
            For Each pr In propertys
                tempName = pr.Name   ‘將屬性名稱賦給暫時變量


                ‘檢查datatable 是否包括此列（列名==對象的屬性名）
                If (dt.Columns.Contains(tempName)) Then  ‘將此屬性與datatable裏列名相比較。查看datatable是否包括此屬性

                    ‘推斷此屬性是否有setter
                    If (pr.CanWrite = False) Then   ‘推斷此屬性是否可寫。假設不可寫。則跳出循環
                        Continue For

                    End If
                    Dim value As Object = dr(tempName)   ‘定義一個對象型的變量來保存列的值

                    If (value.ToString <> DBNull.Value.ToString()) Then   ‘假設非空，則賦給對象的屬性
                        pr.SetValue(myT, value, Nothing)   ‘在執行期間。通過反射，動態的訪問一個對象的屬性

                    End If
                End If
            Next

            myList.Add(myT)   ‘加入到集合
        Next
        Return myList   ‘返回實體集合

    End Function
End Class

泛型集合的使用