测试通过:
Dim DataSet As New Data.DataSetDataSet.ReadXml("c:\135.xml")Tables("窗口1_Table1").DataSource = Dataset.Tables("data")