从数据库读取到字典 VB.net

Question

我有一个问题，通过从 DB2 数据库中选择特定记录的所有列并将它们作为数据网格视图显示给用户来解决。 用户将选择单个记录更改列的值并保存。这样做会插入更新的记录，为此我需要列名，因为有些可能是空的，我必须重新创建记录。

我想出的唯一方法是创建一个字典，其中包含列名和它对应的任何值，以某种方式操纵它并进行插入。

例如，如果我不需要列名，我会使用 LotsList 作为列表（Of LotDTO）。

Using db2reader As OdbcDataReader = db2Com.ExecuteReader
      While db2reader.Read
            LotsList.Add(New LOTDTO With
                             {
                             .LotNo = If(IsDBNull(db2reader("dlot")), "", db2reader("dlot")),
                             .ExpDate = If(IsDBNull(db2reader("ExpDate")), "", db2reader("ExpDate")),

                              }
                         )
       End While

但是如果我要使用字典（Of String，LotDTO）怎么办。 这是我的查询。

 Dim SQL As String = "SELECT ITEMID, TRXDATE, TRXTYPE, REFERNO, ... From DB Where ....

也欢迎任何不超出初学者能力的建议。