这个fill怎么只返回最后一条记录？要怎么才能全部显示？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Dim x As String = e.Form.Controls("textbox23").Text

Dim drs As List(Of DataRow) = DataTables("出库明细").SQ/Select("单号 = '" & x & "'", "", "出库日期 ")

For Each dr5 As DataRow In drs

If dr5 IsNot Nothing Then

Tables("查询_table4").Fill("Se/ect * Fr om {出库单} Where [出库单号] = '" & dr5("出库单号") & "'", "xxxx", False)

msgbox(dr5("出库单号"))

End If

这里的出库单号有三条记录，msgbox返回的也是三条，但是fill只有最后一条。感觉是前两条被覆盖了？要怎么才能在Tables("查询_table4")显示全部记录？

主题：这个fill怎么只返回最后一条记录？要怎么才能全部显示？