DataTables("学生基本信息").LoadFilter = "[院系代码] = '01'"DataTables("学生基本信息").Load
With Tables("学生基本信息")
if .Rows.Count > 0 .Position = .Rows.Count - 1
end ifEnd With