何をしたいあなたが表示するためのクラスインスタンスのコレクションを使用することができますようにそれを使用してネット
Public Class Loads
Private L_nr As String
Private L_plz As String
Private L_km As String
Public Sub New(ByVal nr, ByVal plz, ByVal km)
L_nr = nr
L_plz = plz
L_km = km
End Sub
Public Property nr() As String
Get
Return L_nr
End Get
Set(ByVal Value As String)
L_nr = Value
End Set
End Property
Public Property plz() As String
Get
Return L_plz
End Get
Set(ByVal Value As String)
L_plz = Value
End Set
End Property
Public Property km() As String
Get
Return L_km
End Get
Set(ByVal Value As String)
L_km = Value
End Set
End Property
End Class
にこのクラスを見つけました編集データはDataGridView
Public Class Person
Public Property Id As Integer
Public Property Name As String
End Class
コレクションを作成し、次にjson
形式の文字列にデータをシリアライズpersons
の同じインスタンスを使用するか.DataSource
Dim dataToSave = DirectCast(yourDataGridView.DataSource, List(Of Person))
からそれをキャストDataGridView
からすべてのデータを保存したい場合はDataGridView
Dim persons = new List(Of Person) From
{
New Person { .Id = 1, .Name = "One" },
New Person { .Id = 2, .Name = "Two" },
New Person { .Id = 3, .Name = "Three" }
}
yourDataGridView.DataSource = persons
でそれを示してたとえば、他のフォーマットを自由に使用できます。
Dim serializedData AS String = Newtonsoft.Json.JsonConvert.SerializeObject(dataToSave)
次に、その文字列をデータベースに保存します。データベースからのデータを表示するための
:
// retrieve value from database
Dim serializedData As String = GetFromDatabaseYourFunction()
Dim data = Newtonsoft.Json.JsonConvert.DeserializeObject(Of List(Of Person))(serializedData)
yourDataGridView.DataSource = data