Code Snippet
Imports System.ComponentModel
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim lst As New List(Of MyData)
Dim m As New MyData
m.IsDirty = False
m.ProductName = "Ken"
lst.Add(m)
DataGridView1.DataSource = lst
End Sub
End Class
Public Class MyData
Private m_ProductName As String
Public Property ProductName() As String
Get
Return m_ProductName
End Get
Set(ByVal value As String)
m_ProductName = value
End Set
End Property
Private m_IsDirty As Boolean
<Browsable(False)> _
Public Property IsDirty() As Boolean
Get
Return m_IsDirty
End Get
Set(ByVal value As Boolean)
m_IsDirty = value
End Set
End Property
End Class