- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 没有为 类型“Date” 和 字符串“2017-11-08” 定义运算符“-”。 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=109585)
-- 发布时间：2017/11/15 11:55:00
-- 没有为 类型“Date” 和 字符串“2017-11-08” 定义运算符“-”。
甜老大，出现这个错误。。。
没有为 类型“Date” 和 字符串“2017-11-08” 定义运算符“-”。
Dim d As Date \'变量d用于存储转换结果
If dr("首单日期") <> Nothing Then
If Date.TryParse(dr("首单日期"), d) Then
If dr("首单日期") > forms("调拨补").Controls("DateTimePicker1").value Then
tp = forms("调拨补").Controls("DateTimePicker2").value - dr("首单日期")
Else
tp = forms("调拨补").Controls("DateTimePicker2").value - forms("调拨补").Controls("DateTimePicker1").value
End If
ts = tp.days + 1 \'统计天数
dr("日均销量") = dr("合计_销售数量") / ts
End If
End If
此主题相关图片如下：微信截图_20171115114145.png
数据库表也做了处理：
CONVERT(varchar(10),CAST(dbo.FA_STORAGE_FTP.CHANGEDATE AS datetime),120) as 出入库日期,
[此贴子已经被作者于2017/11/15 12:00:24编辑过]
-- 发布时间：2017/11/15 12:32:00
--
参考
http://www.foxtable.com/webhelp/scr/1517.htm
-- 发布时间：2017/11/15 14:19:00
--
哦哦。OK了！！