Question

我们希望使用For-Next循环逐行迭代TableAdapter，并从强类型DataSet中提取每行中的列值。

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

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

我有点猜测其中一些，但它应该非常接近。

迭代通过强类型DataSet的TableAdapter

1 个答案: