VB.net |如何将access db记录转入tabcontrol add tabpage？

我有一个问题，我想从access记录向我的TabControl添加一个TabPage？我认为是这样的，但没有起作用：

    Dim con As OleDbConnection = New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & My.Application.Info.DirectoryPath.ToString() & "\data\testing.Accdb;Persist Security Info=False;")
    con.Open()
    Dim constr As String = "SELECT ProductType, Discription FROM TblProductType"
    Dim cmd As OleDbCommand = New OleDbCommand(constr, con)
    Dim da As OleDbDataAdapter = New OleDbDataAdapter(cmd)
    Dim ds As DataSet = New DataSet()
    da.Fill(ds, "TblProductType")


    Me.TabControl1.TabPages.Add("Discription")

    con.Close()

---

您必须迭代表的行集合：

Using cmd As New OleDbCommand("SELECT ProductType, Discription FROM TblProductType", con)
  Using rdr As OleDbDataReader = cmd.ExecuteReader
    While rdr.Read
      TabControl1.TabPages.Add(rdr("Discription").ToString)
    End While
  End Using
End Using

---

当然，这只会为每个记录提供一个空的选项卡页，在它的当前实现中，您不再有任何对该记录的引用。如果ProductType是唯一的，那么它也应该在某个地方使用。

选项卡页是一个对象，一个UI对象。描述将只是一个字符串。您不能将字符串转换为选项卡页，它们是两种截然不同的东西。描述可以是标签或文本框。但是标签页上的文本…代码中的描述是文字，而不是从数据库中读取的内容。您必须始终定义它不起作用。似乎要为表中的每条记录添加新选项卡？要做到这一点，您需要对行进行迭代。但这只会得到一个空的选项卡页。@larsTech是的，我想为access db选项卡描述的每个记录添加一个选项卡页，稍后我将填充选项卡页。