SQL1 = "Select 第一张表.工号,第一张表.部门号,第二张表.部门号,第二张表.改变日期 From 第一张表,第二张表 Where 第一张表.工号='" & Text1.Text & "' And 第一张表.部门号=第二张表.部门号 Order BY 第二张表.改变日期 Desc"