Question

Name | CategorieID | FullCategorie_ID
----  -------------  ----------------
 A        1             12  
 B        1             13
 C        5             14
 D        3             15
 E        6             16

我想从datatable中读取数据并将完整的行存储在数组中，然后将其返回

Answer 1

我无法将DataTable（具有行和列）保存在Array（仅具有行）中，但这是您的问题，不是我的！

因此，您正在寻找的代码是这样的：

Dim dt As New System.Data.DataTable
Dim arrayString(dt.Rows.Count - 1) As String
For dr As Integer = 0 To dt.Rows.Count
    For dc As Integer = 0 To dt.Columns.Count
        arrayString(dr) = arrayString(dr) & "$" & dt.Rows(dr).Item(dc)
        'I added a special char ($) to easily split up data later
    Next
Next

如果要将数据分成几列，只需使用String.Split，如下所示：

Dim first_array_row () as String = arrayString.Split("$")

但是我强烈建议您检查您的代码/想法，最好还是找到另一种方法，因为这种解决方法很可怕。

相反，为什么不使用List Class和Dictionary Class

类似：

Dim values As New List(Of Dictionary(Of String, String))()

读取数据并在数组中存储值

1 个答案: