With DataTables("xxb") .LoadFilter = Filter '设置加载条件 .LoadPage = 0 '加载第一页 .LoadTop = 100 '每页100行
.LoadOver = "student_id" .Load() e.Form.Controls("pages").Value = 1 & "页/共" & .TotalPages & "页" End WithTables("xxb").sort="student_id"