Foxtable(狐表)用户栏目专家坐堂 → 日期时间提取


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

主题:日期时间提取

美女呀,离线,留言给我吧!
朱女士
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:513 积分:4073 威望:0 精华:0 注册:2020/2/8 11:14:00
日期时间提取  发帖心情 Post By:2023/5/4 12:33:00 [显示全部帖子]

老师您好!
   我的数据表中的“日期时间”字段为timelongtime型,想把具体数据取出来后,要精确到“分”后再匹配条件计算。就是说现在表中提取的时间是精确到秒的,在下面的计算中,我要将”开工时间“的精确到分就行,换句话说“日期相同,时间”分“相同就视为符合计算条件。ary(1)是字符型的,我会截取字符串。现在的格式:2022-12-03 08:14:11,要保持字段中的原数据格式,只是计算时,不需要比对”秒“,但我不知道对【开工时间】
字段怎么格式化,
Arys = DataTables("实时工序计算表").GetValues("bs|开工时间") 
For Each Ary As String() In Arys

    
    Dim zzl As Double = DataTables("实时工序计算表").Compute("sum(重量)", "bs='" & Ary(0) & "'and 开工时间= #" & Ary(1) & "#")
    drs = DataTables("实时工序计算表").Select("[bs]='" & Ary(0) & "'and 开工时间 = #" & Ary(1) & "#")
    
    For Each dr As DataRow In drs
        If dr IsNot Nothing Then
  Dim t1 As String = Left(ary(1), 17) & "00"
    
    Dim zzl As Double = DataTables("实时工序计算表").Compute("sum(重量)", "bs='" & Ary(0) & "'and 开工时间= #" & Ary(1) & "#")

谢谢!

 回到顶部