VB.NET中如何仅遍历DataSet指定两个表生成Excel工作表

方法一：直接指定索引添加 #

如果只需要固定添加索引为0和1的两个表，直接单独调用Worksheets.Add方法即可，代码简洁直观：

Using wbs As New XLWorkbook()
    ' 添加DataSet中第一个表（索引0）
    wbs.Worksheets.Add(dspatient.Tables(0))
    ' 添加DataSet中第二个表（索引1）
    wbs.Worksheets.Add(dspatient.Tables(1))

    wbs.SaveAs(finalPath)
End Using

方法二：遍历目标索引集合（更灵活） #

如果后续可能需要调整要处理的表，可先定义包含目标索引的集合，再遍历添加，便于维护：

Using wbs As New XLWorkbook()
    ' 定义需要处理的表索引列表
    Dim targetTables As New List(Of Integer) From {0, 1}
    For Each tableIndex As Integer In targetTables
        wbs.Worksheets.Add(dspatient.Tables(tableIndex))
    Next

    wbs.SaveAs(finalPath)
End Using

内容的提问来源于stack exchange，提问作者Shah