Tables(e.Form.Name & "_Table1").DataSource = DataTables("成绩表")
Dim rgd As WinForm.RecordGrid = e.Form.Controls("RecordGrid1")rgd.Table = TaTables(e.Form.Name & "_Table1")rgd.Columns = "编号|区|组别|学校|姓名|项目|成绩1|成绩2|奖项|辅导老师"rgd.Build()