我是实现两个表相连接显示在控件中，我的laifang表中有来访时间和离开时间设置了日期型数据
程序如下：
Dim con As New adodb.Connection
Dim rs As New adodb.Recordset
Private Sub Form_Load()
con.Open "dsn=stud"
Set rs = con.Execute("select * from laifang inner join laifangrr on laifang.证件号码=laifangrr.证件号码")                     '实现表连接问题出在这里
Set MSHFlexGrid1.DataSource = rs
con.Close
End Sub