本文介绍了无法识别的数据库格式的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
Private Sub Cal_AfterUpdate(Index As Integer)
Dim strDate0 As String
Dim strDate1 As String
Dim strSQL As String
strDate0 = Cal(0).Day & "/" & Cal(0).Month & "/" & Cal(0).Year
strDate1 = Cal(1).Day & "/" & Cal(1).Month & "/" & Cal(1).Year
strSQL = "SELECT * FROM employee WHERE date Between #" _
& strDate0 & "# AND #" & strDate1 & "#"
Debug.Print strSQL
Data.RecordSource = strSQL
Data.Refresh
End Sub
msg显示:无法识别的数据库格式
msg showing : unrecognized databse format
推荐答案
这篇关于无法识别的数据库格式的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持!