Vb.net 为datagrid项提供属性

这有点不同

以下代码取自一个javascript脚本。它（假定）所做的是为行项目分配属性。一个名字，一个关系数组，回合数组（他们输了），总赢数，三个平局得分，如果他们有一个再见。（这适用于瑞士配对算法。）

我想在VisualBasic中执行类似的操作。我使用

OleDBReader

从表中提取数据。我想给每个被拉入的项目一组这些属性。然后通过某种方式改变它们

---

我该如何开始呢？

希望这能让你朝着正确的方向前进。我设置了一个非常简单的示例

首先，我创建了一个

LineItem

对象类，该类如下所示：

Public Class LineItem

    Public Property name As String
    Public Property relations As List(Of String)
    Public Property rounds As List(Of String)
    Public Property wins As Integer
    Public Property tie1 As Integer
    Public Property tie2 As Integer
    Public Property tie3 As Integer
    Public Property hadBye As Boolean

    Public Sub New(ByVal name As String)
        'Just a simple constructor
        Me.name = name
    End Sub

    'No methods for the sake of simplicity

End Class

然后在执行所有工作的方法中，我创建了一个新的

LineItem

，并简单地为它设置一些属性，如下所示：

Private Sub SetupMyObject()
        Dim lineItem1 As New LineItem("myName")
        'Add some relations
        lineItem1.relations.Add("firstRelation")
        lineItem1.relations.Add("secondRelation")
        'Add some rounds
        lineItem1.rounds.Add("firstRound")
        lineItem1.rounds.Add("secondRound")
        'Set wins
        lineItem1.wins = 4
        'Set tie1
        lineItem1.tie1 = 2
        'set tie2
        lineItem1.tie2 = 0
        'set tie3
        lineItem1.tie3 = 3
        'Set the bye flag
        lineItem1.hadBye = False
    End Sub

这段代码非常抽象，因此修改它以符合您的需要应该不会太困难

Private Sub SetupMyObject()
        Dim lineItem1 As New LineItem("myName")
        'Add some relations
        lineItem1.relations.Add("firstRelation")
        lineItem1.relations.Add("secondRelation")
        'Add some rounds
        lineItem1.rounds.Add("firstRound")
        lineItem1.rounds.Add("secondRound")
        'Set wins
        lineItem1.wins = 4
        'Set tie1
        lineItem1.tie1 = 2
        'set tie2
        lineItem1.tie2 = 0
        'set tie3
        lineItem1.tie3 = 3
        'Set the bye flag
        lineItem1.hadBye = False
    End Sub