主题：[求助] 数值比较问题

3600分钟？
3600秒？
 
Dim dr2 As DataRow
dr2 = DataTables("惠州多项列表项目表").Find("[表名] = '抢修整治迁改表' And [列名] = '申请区域'  And [列表项目1] = '" & e.DataRow("申请区域") & "'  ")
If dr2 IsNot Nothing Then       
    dr("通知提醒时间") = dr("通知代维单位时间").AddSeconds(dr2("列表项目3"))
Else
    dr("通知提醒时间") = Nothing
end if

参考：
 
http://www.foxtable.com/webhelp/scr/1337.htm