时间戳

首页 > 解决方案 > 在对象类中添加和删除数据

json - 在对象类中添加和删除数据

问题描述

我只是在学习如何使用 Json 文件，我的目标是：

为此，我了解了 Newtonsoft.Json，这很有帮助。除了能够从我的对象中添加和删除项目之外，我几乎已经实现了所有目标。

首先，我将所有 Json 内容加载到：

Dim ImportedTeams as Teams()

类对象的代码如下：

Public Class Teams
    Property drivers As Drivers()
    Property raceNumber As String
    Property CarModel As String
    Property ballastKg As String
    Property restrictor As String
End Class

Public Class Drivers
    Property firstName As String
    Property lastName As String
End Class

我有已填充所有数据的 ImportedTeams，从那里我得到了填充 Treeview 所需的所有内容，以及不同级别的节点等。此外，我可以修改存储在类中的信息，并再次制作 Json。到目前为止没有问题

当我想添加一个新团队时，我的问题从这里开始。我尝试的是以下内容：

Dim NewTeam As New Teams
Dim NewDriver as New Drivers

With NewDriver
  .firstName = TB_Name.text
  .lastName = TB_LastName.text
End With


With NewTeam 
  .drivers = NewDriver()
  .raceNumber = NUD_RaceNumbre.Value.ToString
  .CarModel = CBB_Car.index
  .ballastKg = TB_Ballast.Text
  .restrictor = TB_Restrictor.Text
End With
    
ImportedTeams.append(NewTeam)

这根本行不通。不要显示任何错误，只是没有任何反应。另外，我不知道如何删除存储在此对象中的一个团队。

我也尝试只添加一个 NewTeam，但同样的问题。

感谢您的时间伙伴，任何帮助将不胜感激。

标签： jsonvb.netclass

解决方案

正如 Alex B. 所说，解决方案很简单，如下所示：

Public Class Teams
    Property drivers As **List(of Drivers)**
    Property raceNumber As String
    Property CarModel As String
    Property ballastKg As String
    Property restrictor As String
End Class

Public Class Drivers
    Property firstName As String
    Property lastName As String
End Class

和：

Dim ImportedTeams as **List(of Teams)**

谢谢！

推荐阅读