我想在类Foo中的属性Bars中显示每个项目作为单独的数据绑定DataGridViewColumns。目前,在设置DGV的数据源时,只有属性名称显示为列。我希望HeaderText是每个Bar的Name属性,并且单元格的值是IsValid属性。
Public Class frmDebugTesting
Private fooList As New List(Of Foo)
Private Sub frmDebugTesting_Load(sender As Object, e As EventArgs) Handles Me.Load
Dim foo1 As New Foo
foo1.Name = "John Doe"
Dim bar1 As New Bar
bar1.Name = "Example 1"
bar1.IsValid = True
foo1.Bars.Add(bar1)
Dim bar2 As New Bar
bar2.Name = "Example 2"
bar2.IsValid = False
foo1.Bars.Add(bar2)
fooList.Add(foo1)
DataGridView1.DataSource = fooList
End Sub
End Class
Public Class Bar
Public Property IsValid As Boolean
Public Property Name As String
End Class
Public Class Foo
Public Property Name As String
Public Property Bars As New List(Of Bar)
End Class