有没有"窗口3"啊.如果这样,简单一点按照上午我给的加载一个新的表,再加载XML,也行
Forms("窗口1").Controls("table1").Visible=FalseDim tbl As WinForm.Tabletbl = e.Form.CreateTable("Table2", "表A", False)tbl.SetBounds(44, 15, 409, 148)e.Form.AddControl(tbl)
Dim DataSet As New Data.DataSetDataSet.ReadXml("c:\136.xml")Tables("窗口1_Table2").DataSource = Dataset.Tables("data")