第一步:建立对象
DimdsAsDataSet=NewDataSet("dsName")
Dimdt1AsDataTable=NewDataTable
Dimdt2AsDataTable=NewDataTable
第二步:获取数据,重命名Datatable,两个表添加在ds中
dt1=GetDate1().Copy//注意复制数据和表结构
dt1.TableName="dt1"
ds.Tables.Add(dt1)
dt2=GetDate2().Copy//注意复制数据和表结构
dt2.TableName="dt2"
ds.Tables.Add(dt2)