vb.net - 使用多个表创建（循环）数据集

Question

我需要创建几个（直到运行时我才知道有多少）表并将每个表添加到数据集中。每个数据表都需要有一个不同的名称，可以根据循环变量来构造。

sub fillDataTableA(byref dt as datatable)
...  code to fill table
end sub
sub fillDataTableB(byref dt as datatable)
...  code to fill table
end sub

loop through branches
   dim dt  (name it as "branch1 A")      '  "branch#" comes from loop
  fillDataTableA(dt)
   dataset.add  (dt)          ' add this table to dataset

   dim dt  ( name it as "branch1 B")
   fillDataTableB(dt)     
   dataset.add  (dt)   ' add second table for this branch
next  (branch)

processDataSets(dataset)

因此，如果有 4 个分支，则将有 8 个表添加到数据集中。我的问题是我不知道如何以不同的方式命名它们（表）并动态地添加到数据集中。

你能看到如何解决这个问题吗？谢谢！

Answer 1

这足以让你开始吗？

    Dim n As Integer
    Dim ds As New DataSet

    Dim s = InputBox("Number of tables?")
    n = Integer.Parse(s)

    For i = 1 To n
        Dim t As New DataTable With {.TableName = "newtable" & i.ToString}
        ds.Tables.Add(t)
    Next

Answer 2

这是你需要的吗？

Dim ds As New DataSet

for i as integer=0 to 9

 Dim dt As New DataTable("NameOfTable" & i.tostring)
 ds.Tables.Add(dt)

Next