以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  提示year没有定义错误  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=114701)

--  作者:xxfoxtable
--  发布时间:2018/2/13 20:48:00
--  提示year没有定义错误
Dim rkc As DataRow=DataTables("日库存表").find("[编号]=\'" & dr("编号") &"\' And year([日期])=\'" & cb1.text & "\' And month(日期)=\'" & cb2.text &"\'")
cb1 cb2是二个combox控件,分别是2018和2

表达式包含未定义的函数调用 year()。
[此贴子已经被作者于2018/2/13 20:50:19编辑过]

--  作者:有点蓝
--  发布时间:2018/2/13 20:53:00
--  
表达式没有year的用法

Dim d1 As Date = new Date(val(cb1.text),val(cb2.text),1)
Dim rkc As DataRow=DataTables("日库存表").find("[编号]=\'" & dr("编号") & "\' And 日期 >= \'" & d1 & "\' And 日期<\'" & d1.AddMonths(1) & "\'")