您好Stackoverflow社区!
我的问题在于如何在使用SQL从表中提取的列表框中创建自定义列。参考下面当前列表的代码和图片,我想创建一个未存储在表中的自定义列,该列将称为“ DaysActive”,并且将采用今天的日期减去所显示的每个记录的StatusEffect日期,并给出在其自己的列中的天数,例如StatusEffect和Yr之间的天数。这可能吗?预先感谢您抽出宝贵的时间阅读此内容。
Private Sub Form_Load()
DoCmd.RunCommand acCmdWindowHide
Dim rs As Recordset
Dim strSQL As String
Dim lstnum
strSQL = "SELECT LastName, FirstName, Status, StatusEffect, Yr, Make, Model, VIN, Deduction, USLicense, RegistrationState, Dependents,Notes, ID FROM InsuranceTable" & _
"WHERE SentRegistration = False And Status IN ('active','add') Order By StatusEffect Desc "
Set rs = CurrentDb.OpenRecordset(strSQL, dbOpenSnapshot)
Set Me.lstInfo.Recordset = rs
lstnum = [lstInfo].[ListCount]
Me.lstcount.Value = lstnum - 1
End Sub
DateDiff()
在SQL中使用该函数。
DateDiff('d')
返回天数的差额。
SELECT ..., StatusEffect, DateDiff('d',[StatusEffect],Date()) AS DaysActive, Yr, ...
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句