以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于日期列的空值  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=149764)
--  作者：ygg8310
--  发布时间：2020/5/11 20:55:00
--  关于日期列的空值
日期列的空值如何赋值？比如说赋值为Today
--  作者：有点蓝
--  发布时间：2020/5/11 21:08:00
--  
空值
dr("日期") = nothing
当天
dr("日期") = date.today
--  作者：ygg8310
--  发布时间：2020/5/27 15:49:00
--  
老师，空值
dr("日期") = nothing
当天
dr("日期") = date.today
这个方法运用到find里面该怎么写？
--  作者：有点蓝
--  发布时间：2020/5/27 16:33:00
--  
find("日期 is null")

find("日期 = #" & date.today & "#")
--  作者：ygg8310
--  发布时间：2020/5/27 22:27:00
--  
DataTables("物资归还").Find("物资 = \'" & r("物资") & "\' And 借出时间 <= \'" & r("借出时间") & "\' AND 物资归还时间 = #" & r(物资归还时间) & "\'") 
如果这个r(物资归还时间)存在空值，我想实现把这个空值赋值为date.today
这个代码该怎么个写法？

[此贴子已经被作者于2020/5/27 22:28:38编辑过]
--  作者：sloyy
--  发布时间：2020/5/27 22:32:00
--  
dim dr as datarow
dr=DataTables("物资归还").Find("物资 = \'" & r("物资") & "\' And 借出时间  is null") 
if dr isnot nothing
dr("借出时间 ")=date.today
endif