通过强类型 DataSet 的 TableAdapter 迭代

Question

我们想使用 For-Next 循环逐行遍历 TableAdapter，并从强类型 DataSet 中提取每一行中的列值。

TableAdapter 是在 Visual Studio 数据集设计器中创建的。以下名称已用于数据库对象。

DataSet Name:      DataSetSchedules
DataTable Name:    DataTableSchedules
TableAdapter Name: DataTableDataAdapterSchedules

这是我开始的编码：

Dim strClassName As String = ""
Dim objAadapter As New DataSetSchedulesTableAdapters.DataTableTableAdapterSchedules
Dim objDataTable As DataSetSchedulesTableAdapters.DataTableTableAdapterSchedules

<I need a way to fill the table with data from> = objAadapter.GetDataByAll(TextBoxSearch)

For Each row As System.Data.DataRow In objDataTable
    strClassName = row.ClassName
Next

请提供我们需要的缺失编码，因为我尝试使用：

Dim objDataTable As DataTableSchedules = objAadapter.GetDataByAll(TextBoxSearch)

并显示此错误：

Error 1 Type 'DataTableSchedules' is not defined.

我意识到我可以设置命令对象和 DataReader，但更喜欢使用已经存在的对象。这个问题已经让我们卡了好几天了。

Answer 1

如果您键入 DataSetSchedulesTableAdapters.DataTableTableAdapterSchedules 是数据检索部分，您还将拥有一个名为 DataSetSchedules 的类，该类将具有保存您检索的数据以及强类型数据表和数据行的类结构。

Dim strClassName As String = ""
Dim objAadapter As New Knowledge_Academy.DataSetSchedulesTableAdapters.DataTableTableAdapterSchedules
Dim objDataTable As Knowledge_Academy.DataSetSchedules.DataSetSchedulesDataTable
Dim objDataRow As Knowledge_Academy.DataSetSchedules.DataSetSchedulesRow

objDataTable = objAadapter.GetDataByAll(TextBoxSearch)

For Each objDataRow In objDataTable.Rows
    strClassName = objDataRow.ClassName
Next

我对此有些猜测，但应该非常接近。