只给出SQL语句,具体VB语法不太清楚。select * from 表1 inner join 表2 on 表1.日期=表2.日期;使用inner join 连接两个表,其中* 可以用其他字段代替,如果有相同的列名,则使用表名.列名,如表1.日期。