vba—通过sql语句传递函数

ztyzrc3y  于 2021-07-29  发布在  Java
关注(0)|答案(1)|浏览(468)

我是比较新的访问,我希望你能帮助一个问题。

Private_Sub Form_Load()

Dim db as DAO.Database
Dim rs as DAO.Recordset
Dim StrSQL as String

Set db = CurrentDb

StrSQL = "Select GetDateDiff(Date1, Date2) as DateDifference from tblDattes"
Set rs = db.OpenRecordset(StrSQL)

.....

End Sub

getdatediff是一个将两个参数作为变量的函数。我不确定该函数如何在sql代码中使用。

mhd8tkvw

mhd8tkvw1#

假设date1和date2是tbldattes表的字段。

StrSQL = "Select GetDateDiff(Date1, Date2) as DateDifference from tblDattes" 
Set rs = db.OpenRecordset(StrSQL)

会有用的。但您应该扪心自问,为什么要在getdatediff函数中使用变量参数。一般来说,避免使用variant并选择date字段。如果其中一个(或两个)参数为null,则函数必须执行检查。
p、 还要确保表的名称真的是tbldattes(带有两个't')

相关问题