Foxtable(狐表)用户栏目专家坐堂 → 条件表达式中如何获取日期输入框中的日期?


  共有1750人关注过本帖树形打印复制链接

主题:条件表达式中如何获取日期输入框中的日期?

帅哥哟,离线,有人找我吗?
1669607010
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:380 积分:3515 威望:0 精华:0 注册:2017/9/5 8:28:00
条件表达式中如何获取日期输入框中的日期?  发帖心情 Post By:2017/9/5 9:42:00 [只看该作者]

条件表达式中如何获取日期输入框中的日期?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/9/5 9:53:00 [只看该作者]

 无法获取。

 

 请具体说明你要做什么。尽量上传实例说明。


 回到顶部
帅哥哟,离线,有人找我吗?
1669607010
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:380 积分:3515 威望:0 精华:0 注册:2017/9/5 8:28:00
  发帖心情 Post By:2017/9/5 10:06:00 [只看该作者]

老师好,我的代码如下:



DataTables("染化料助剂库存盘点").DataRows.Clear()
Dim st As Date = Date.Now
Dim nms As List(of String) = DataTables("染料助剂录入").GetUniqueValues("","入账分类")
 
DataTables("染化料助剂库存盘点").StopRedraw()
For Each nm As String In nms
    Dim dr As DataRow = DataTables("染化料助剂库存盘点").AddNew()
    dr("入账分类") = nm


    dr("已结算数量") = DataTables("染料助剂录入").Compute("Sum(采购数量)", "入账分类= '" & nm & "' And 结算情况 = 1")
    dr("未结算数量") = DataTables("染料助剂录入").Compute("Sum(采购数量)", "入账分类= '" & nm & "' And 结算情况 = 0")
    dr("采购总数量") = DataTables("染料助剂录入").Compute("Sum(采购数量)","入账分类= '" & nm & "' ")



    dr("本月结算数量") = DataTables("染料助剂录入").Compute("Sum(采购数量)", "入账分类= '" & nm & "' And 结算日期 >= #7/23/2017#  And 结算日期 <= #8/22/2017#")
    dr("本月领料数量") = DataTables("染料助剂录入").Compute("Sum(采购数量)", "入账分类= '" & nm & "' And 操作日期 >= #7/23/2017# And 操作日期 <= #8/22/2017#")    
Next

DataTables("染化料助剂库存盘点").ResumeRedraw()





现在我想把代码中红色的日期改为由开始时间、结束时间2个日期输入框实现,该怎么实现?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/9/5 10:09:00 [只看该作者]

Dim d1 As Date = Forms("窗口1").Controls("DateTimePicker1").Value

Dim d2 As Date = Forms("窗口1").Controls("DateTimePicker2").Value

 

dr("本月结算数量") = DataTables("染料助剂录入").Compute("Sum(采购数量)", "入账分类= '" & nm & "' And 结算日期 >= #" & d1 & "#  And 结算日期 <= #" & d2 & "#")


 回到顶部
帅哥哟,离线,有人找我吗?
1669607010
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:380 积分:3515 威望:0 精华:0 注册:2017/9/5 8:28:00
  发帖心情 Post By:2017/9/5 10:18:00 [只看该作者]

谢谢老师

 回到顶部